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GRÜSS GOTT 


Mittlerweile dürften alle 
Leser aus dem Urlaub 
zurück sein und es geht 
frisch gestärkt an den 
Computer. Wir hoffen, 
Sie konnten sich gut er- 
holen und sind bereit 
für alles, was sich in den 
nächsten Monaten rund 
um den CPC (und natür- 
lich auch um den PC) 
tun wird. Anscheinend 
haben nämlich die Hard- 
ware- und Softwareher- 
steller keine Ferien. Man 
will ja schließlich bereit 
sein, wenn der Kunde 
sein Weihnachtsgeld ver- 
teilt. 

Daß Schneider den CPC 
forciert, ist ja spätestens 
seit der Pressekonferenz 
bekannt. Niedrige Preise 
und neue Peripherie 
(BTX-Modul, Drucker 
usw.) sollen dabei helfen, 
den CPC zur Nummer 1 
zu machen. Wer die Ver- 
kaufszahlen des Commo- 
dore C64 kennt, der 
weiß, daß dies ein langer 
Weg werden kann. 
Immerhin reagieren schon 


die Softwareproduzenten. 


Wer bisher glaubte, mit 
WordStar sei das Thema 
Textverarbeitung auf 
dem 6128 erledigt, der 
muß seine Meinung neu 
bilden. Von der Firma 
Arnor erreichte uns ein 
Editor der Sonderklasse. 
Und daß dieser sogar ein 
bißchen besser wurde als 
er ohnehin schon war, 
ist unserem Redakteur 
Lothar Miedel zu verdan- 
ken. Nach einem Anruf 
von ihm änderte der Ver- 
lag Arnor die Tastaturbe- 
legung, so daß Sie nun- 
mehr den Vorstellungen 
deutscher Schreibmaschi- 
nenkünstler entspricht. 
Es zahlt sich eben doch 
aus, wenn nicht nur ge- 


meckert, sondern ein kon- 


struktiver Vorschlag ge- 
macht wird. Der lachende 
Dritte ist hierbei der 
Endverbraucher. Selbst- 
verständlich wurde der 


Test über die verbesserte 
Version geschrieben. 
Damit sind wir auch 
schon bei einem unange- 
nehmen Thema. Uns 
flattern in letzter Zeit 
immer mehr Vorabver- 
sionen in die Redaktion. 
Im Interesse unserer Le- 
ser können wir diese Pro- 
gramme nicht ohne Vor- 
behalt testen. Wer 

weiß schon, ob eine 
Spielbeschreibung nicht 
extra nur für den Tester 
übersetzt wird und sich 
der Hersteller die Druck- 
kosten einer Übersetzung 
doch spart? Und wer 
weiß schon, ob das 
„leider noch nicht 
druckreife‘ Manual wirk- 
lich so „‚hervorragend” 
ist, wie es der „Wasch- 
zettel’’ besagt? Es ist 
manchmal recht müh- 
sam, sich aus diesem 
Grund mit den Firmen 
auseinanderzusetzen. Aber 
wir wollen unseren Le- 
sern an dieser Stelle eine 
Garantie zu unseren Test- 
berichten geben: Was wir 
testen, können Sie in die- 
ser Version auch kaufen. 
Wenn wir ein Manual lo- 
ben, dann haben wir es 
gelesen und nicht nur die 
Ankündigung dazu abge- 
schrieben. Wenn uns ein 
Spiel gefällt, dann haben 
wir es gespielt und nicht 


nur eine Demoversion (wo- 


möglich auch noch als 
Video) gesehen. Sollten 
wir tatsächlich doch ein- 
mal ein Programm testen, 
welches nicht der Han- 
delsversion entspricht, so 
weisen wir Sie ausdrück- 
lich darauf hin und nen- 
nen die Unterschiede. 
Große Veränderungen 
stehen an und damit Sie 
nicht so sehr davon über- 
rascht werden, verraten 
wir schon jetzt ein paar 
Kleinigkeiten. Nachdem 
der Umfang von Schnei- 
der aktiv ohne jede Wer- 
bung auf 96 Seiten stieg, 
wollen wir nun ein wenig 
die Druckqualität verbes- 
sern. Auch hier bleibt uns 
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nichts anderes übrig als 
schrittweise vorzugehen, 
denn wir wollen auch mit 
gestiegenen Druckkosten 
unabhängig bleiben. In- 
haltlich tut sich auch et- 
was und eine ganze Menge 
Ideen stehen zur Verwirk- 
lichung an. So wird es in 
Zukunft in jeder Ausga- 
be etwas zu gewinnen ge- 
ben, vorausgesetzt, Sie 
schreiben uns nur. Wir 
werden den Listingteil 
noch einmal überarbei- 
ten und etwas besser ge- 
stalten und wir bieten dem 
Einsteiger auf ein paar 
Seiten die Gelegenheit, 
seinen CPC etwas besser 
kennen zu lernen. Ganz 
bestimmt wird jedes Heft 
des neuen Jahres mit ei- 
nem „Generalthema” ver- 
sehen werden. Auf diese 
Weise erhalten Sie den 
größtmöglichen Überblick 
über Drucker, Laufwerke 
oder Software. 

All diese Änderungen 
werden sich auch auf dem 
Titeiblatt zeigen. 

Es hat lange gedauert, 
aber wir haben wieder 
ein „Listing des Monats’'. 
Das Warten hat sich für 
uns und unsere Leser ge- 
lohnt. Das Malprogramm 
von Günther Radestock 
steht professioneller Soft- 
ware dieser Art in nichts 
nach. Abtippen (oder un- 
ser Softbox-Angebot) 
lohnt ganz bestimmt. 
Damit es jedoch keine 
Enttäuschung gibt: Die 
Dame muß sich jeder 
selbst zeichnen. Dabei 
wünsche ich Ihnen im 
Namen der Redaktion 
viel Spaß 


Gert Seidel 
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ZIGGURAT 


Auf der Suche nach dem 
verlorenen Schatz 


Neben ‚‚Bride of Frankenstein” stellte Ariolasoft unlängst 
noch ein weiteres neues Programm vor: Ziggurat, ein Abenteuerspiel im 
mittlerweile typischer 3D-Methode. Nichts umwerfend Neues, aber 
durchaus interessant und leicht zu spielen. Ein Programm für alle, die 
gerne einmal zwischendurch ein bißchen tüfteln wollen und denen es 
nicht darauf ankommt, die allerneueste Software zu besitzen. 


Vor Jahrhunderten nahm Tehotec, 
der alte Herrscher des gleichnami- 
gen Landes, der damals als verrückt 
gegolten hatte, das Geheimnis sei- 
nes riesigen, unermeßlichen Schat- 
zes mit ins Grab. Dieses befindet 
sich tief im Inneren der geheim- 
nisvollen Tempelpyramide Ziggurat. 
Viele Forscher und Grabräuber 
haben schon versucht, in die Pyra- 
mide einzudringen und den Schatz 
zu finden. Keiner von ihnen ist je- 
mals wieder lebend aus der Pyra- 
mide herausgekommen. Als eines 
Tages ein sehr bekannter Forscher 
und Professor der Altertumsfor- 
schung im Freundeskreis erzählt, 
daß er versuchen wolle, das Rätsel 
zu finden, erntet er großes Geläch- 
ter. Seine Freunde nennen ihn 
einen armen, verrückten Narren, 
wenn er glaube, die Pyramide wie- 
der lebend zu verlassen. Aber eben- 
so bekannt wie sein weites Wissen 
ist sein leider nur allzu großer 
Dickkopf. 


MAKABRE GESCHICHTE VON 
GRABRÄUBERN UND GEISTERN 


So kommt es auch, dafs der Profes- 
sor ein paar Tage später bereits im 
Flugzeug sitzt Nach vielen vergeb- 
lichen und verzweifelten Versu- 
chen gelingt es ihm dann schließlich, 
den Eingang zu finden. Sein bisher 
immer treuer Assistent wagt einen 
letzten Versuch, seinen Chef zu- 
rückzuhalten, der allerdings schei- 
tert. Der Professor betritt unter den 
entsetzten Blicken der Eingebore- 
nen die Zigguratpyramide. Krachend 
fällt die schwere Steintür hinter ihm 
zu. Der Professor weiß, dafs er sich 
eine sehr schwere Aufgabe vorgenom- 
men hat. Es gilt nun, den Schatz zu 
finden. Aber nicht nur, daß er sich 
in der großen Pyramide verirren 
könnte. Er ist nicht allein in dem 
alten Gemäuer. Die Geister der frü- 
heren, gescheiterten Forscher ma- 
chen ihm das Leben schwer. Eine 


längere Berührung mit ihnen kann 
dem Professor das Leben kosten. 
Glücklicherweise hat er ja fünf da- 
von zur Verfügung. 

An dieser Stelle übernimmt nun der 
Spieler die Rolle des Professors 

Um es auch gleich vorwegzuneh- 
men: Eine sonderlich hohe Spiel- 
motivation ist bei diesem Pro- 
gramm von Ariolasoft nicht vorhan- 
den. Man hat zwar versucht, das 
Spiel durch viele Features etwas 
aufzulockern, was aber nur teilwei- 
se gelungen ist. Bei Ziggurat han- 
delt es sich leider wieder mal um 
ein typisches 3D-Adventure, wie 

sie seit Knight Lore sehr häufig zu 
finden sind. Die Grafik beschränkt 


DREIDIMENSIONALE RÄUME 
ALA KNIGHT LORE 


sich lediglich auf das Nötigste, wie 
die Geister, die übrigens auch 
Mimbis genannt werden, und ein 
paar spärliche Einrichtungsgegen- 
stände wie Steinblöcke, Holzkisten 
oder Schatztruhen. In jedem Raum 
gibt es einen oder mehrere Tür- 
rahmen, Bewegt man seine Spiel- 
figur unter einen solchen, dann be- 
findet man sich sofort im näch- 
sten Raum. 


GESCHICKTER 
SZENENWECHSEL 


Dieser Wechsel geht übrigens sehr 
schön vonstatten: Der ganze Bild- 
schirm wird nach links oder rechts 
gescrollt, der alte Raum verschwin- 
det in einem Bildschirmrand, der 
neue Raum taucht aus dem anderen 
Rand auf. Eine gute und nette Idee 
Der Professor und die Mimbis glei- 
chen sich im Übrigen aufs Haar. 

Sie unterscheiden sich lediglich 
durch ihre Farbe: Während unser 
Forscher im bekannten grünen 
Safarianzug steckt, tragen die Mim- 
bis den selben, allerdings in Leichen- 
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grau (grusel. grusel!) Daraus könn- 
te man schlietsen, dats sich die da- 
malige Mode anscheinend wieder- 
holt. Die Figuren sind sehr detail- 
liert gestaltet Sie tragen alle Safari- 
hüte und man kann bei genauerem 
Hinsehen sogar ein Gesicht mit 

rosa Lippen erkennen Die einzel- 
nen Gegenstände sind zwar auch 
gut gestaltet, aber leider meistens 
nicht auf den ersten Blick zu erken- 
nen. Am besten, man sieht sich vor 
dem ersten Spielversuch erst einmal 
das Demo an, welches nach einiger 
Zeit und vergeblichem Warten auf 


Sparsame Einrichtung, aber schneller 


Tastendruck abläuft. Hierbei kann 
man sich am besten einen Eindruck 
über Ziggurat verschaffen. 

Der Sound, der während des gan- 
zen Spiels abläuft, aber auch ab- 
stellbar ist, kann durchaus als gelun- 
gen bezeichnet werden. Nichts- 
destoweniger kann er bei einem län- 
geren Spielverlauf ganz schön ner- 
ven. 


Die grundsätzliche Aufgabe des Spie- 
lers besteht ja, wie bereits gesagt, 
darin, den Schatz zu finden. Aller- 
dings geht es bei Ziggurat auch um 


Szenenwechsel 


Punkte. Diese erhält man am 
schnellsten durch das Vernichten 
von ein paar störenden Mimbis. 


ALS FORSCHER NICHT 
GANZ WEHRLOS 


Jawoll, richtig gelesen! Man ist den 
Geistern nicht völlig hilflos ausge- 
liefert, sondern kann durchaus 
seinen Teil zum Spuken beitragen. 
Um die Mimbis zu vernichten, 
braucht man die Schleuder und 
einige Kieselsteine, die man in so 
einem alten Gemäuser wie einer 
Pyramide natürlich in rauhen Men- 
gen antrifft. 

Allerdings hinterlassen die getöte- 
ten Mimbis einen sehr unangeneh- 
men grünen Matsch, vor dem den 
Professor auch seine ZEB’s nicht 
schützen. Für alle, die es noch nicht 
wissen: ZEB’s sind sogenannte 
Ziggurat Entdecker Botten (Stie- 
fel), Größe 12, mit denen selbstver- 
ständlich jeder anständige Forscher 
ausgestattet ist. 


EIN SPIEL FÜR SAMMLER 


NÜTZLICHER GEGENSTÄNDE 


Aber warum denn immer gleich 
töten, werden jetzt diejenigen unter 
uns sagen, die das „gewalttätige 
Computerspiel‘ (zurecht) verab- 
scheuen. Keine Sorge, auch für die- 
ses Problem hat Ziggurat eine Lö- 
sung parat: In den Dörfern um die 
Pyramide herum munkelt man, dafs 
die Mimbis ganz wild auf tote 
Mäuse sind. Und tatsächlich können 
sie ihnen einfach nicht widerstehen! 
So schwer hört sich die zu lösende 
Aufgabe gar nicht an, werden jetzt 
viele denken. Aber die Mimbis sind 
schließlich nicht das einzige Pro- 
blem. Der Spieler muß viele Rätsel 
lösen, bevor er in den Besitz des 
Schatzes kommen kann. Dazu ein 
kleines Beispiel, sozusagen als Vor- 
geschmack: Was macht man, wenn 
sich durch den ganzen Raum eine 
riesige Spalte erstreckt? Oder etwas 
anderes: Wie benutzt man einen 
Fahrstuhl ohne Knopf zur Bedie- 
nung? Die Lösungen zu diesen Fra- 
gen liegen im wahrsten Sinne des 
Wortes im Spiel herum. Neben den 
üblichen Einrichtungsgegenstän- 
den kann man nämlich auch viele 
nützliche Dinge in der großen j 
Zigguratpyramide finden, zum Bei- 
spiel Murmeln, Stemmeisen, 
Schlüssel, Kieselsteine, Steinschleu- 
dern, Falltürgriffe und sogar echt 
antike Fahrstuhlknöpfe (was es 
damals schon alles gab!). 
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Da das Programm ziemlich viele 
Räume besitzt, empfiehlt es sich, 
eine Karte anzulegen, weil man 
sonst sehr schnell die Übersicht ver- 
lieren kann. Einige besondere Fea- 
tures des Spieles sollen hier noch 
kurz erwähnt werden: Es besteht 
die Möglichkeit, die Blickrichtung 


SELBSTMORD MIT TAB-TASTE 


umzukehren. Dies kann sehr nütz- 
lich sein, wenn die Spielfigur plötz- 
lich hinter einer Steintür verschwin- 
det. Auf die Steuerung wirkt sich 
dies übrigens nicht aus. Mit einer 
der SHIFT-Tasten kann das Spiel 
angehalten und wieder fortgesetzt 
werden. Mit ESC wird die Partie 
abgebrochen Zum Schluß noch ein 
besonderes Bonbon für Masochisten 
und Ähnliche: Mittels Druck auf 
die TAB-Taste kann man sich selbst 
eines der ohnehin wenigen Leben 
nehmen, wodurch die Aufgabe 
noch erschwert wird. 


Grafik 


Motivation 


Bedienung 


Von Tigress hei ariolasoft 


FAZIT: NICHTS NEUES ABER 
SEHR EMPFEHLENSWERT 


Ein Spiel der guten Mittelklasse. 
Wer noch nicht allzu viele 3D- 
Adventures a la Knight Lore in sei- 
ner Sammlung hat, der sollte sich 
Ziggurat unbedingt ansehen Allen, 
die gerne ein bifschen tüfteln, kann 
das Spielnur wärmstens empfoh- 
len werden. Aber lassen Sie sich 
warnen: Die Steuerung ist etwas 
langsam geraten, wodurch die für 
das Programm aufzuwendende 
Zeit ein wenig länger wird. Also: 
Ruhig mal anschauen! 

(TB) 
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Software und Dienstleistungen 
Beratung — Software — 
sonstige Dienstleistungen 
Software and Services 
consultants — software — 
other services 


Software et prestations de services 
service conseil — software (logiciel) — 
autres prestations de services 


System-Komponenten (OEM) 
Baugruppen — Einzelgeräte 

System Components (OEM) 

assemblies — individual devices 
Composants du systeme (OEM) 
sous-ensembles — appareils individuels 


Kommunikationstechnik 
Communications Technology 
Technique de ia communication 


Systeme für den Arbeitsplatz Büro 
Office Systems 

Systemes concernant le bureau en tant 
que lieu de travail 


Rechenzentrumsausstattungen 

und Zubehör 

Computer-Centre Equipment 

and Accessories 

Equipements pour centres de calcul 
et accessoires 


Informationszentrum 

SYSTEMS-Studio — 

Besucherinformation — Verbände — 
Verlage und Informationsdienste 

Information Centre 

SYSTEMS Studio — 

Visitors’ information — Trade associations — 
Publishing houses and 

information services 


Centre d’information 

studio SYSTEMS — 

information des visiteurs — associations — 
maisons d’edition et centres d’information 


Einstieg in die Informationsverarbeitung 
Starting Off in Information Processing 
Initiation a l’informatique 


Systeme für Wirtschaft und Verwaltung 
Business and Administration Systems 
Systemes pour l’industrie et l’administration 


Eingänge 
Entrances 


Navette-aeroport Entrees 
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Es ist geschafft! Obwohl 
hoffnungslos überbucht — 
um jeden Quadratmeter 
gibt es härteste Auseinan- 
dersetzungen — konnten 
wir noch einen Ausstel- 
lungsplatz auf derSystems 
1987 ergattern. Sie fin- 
den uns, wie Sie ja auf 
unserem Titel bereits ge- 
sehen haben, in Halle 21, 
Stand C 10. 

Hiermit laden wir alle un- 
sere Leser, so der Weg sie 
zur Systems führt, ein, 
doch einmal vorbeizu- 
schauen. 

Allerdings mit einer Ein- 
schränkung! Wir bitten 
um Verständnis, daß auf 
den uns „im Gnadenwe- 
ge’ zugestandenen 25 
Quadratmetern Stand 
nun wirklich nur ein ‚„‚ge- 
regelter’’ Besuchsverkehr 
stattfinden kann. Da, wie 
Sie ja wissen, in diesem 
Verlag mehrere Compu- 
ter-Titel erscheinen, 
möchte jeder gerne mit 
der Redaktion ‚‚seines’ 
Objektes sprechen kön- 
nen. Das heißt: Wir bitten 
Sie, sollten Sie Fragen 
oder Probleme haben, 
sich an die „‚Besuchszei- 
ten’’ zu halten, denn nur 
dann ist sichergestellt, 
daß auch die betreffende 
Redaktion auf dem Stand 
vertreten ist (die müssen 
ja auch fürs Heft was tun!) 
Dementsprechend bitten 
wir unsere Leser und 
Besitzer von: 


Commodore C16/P4 

täglich 9 bis 11 
Commodore 64/128 

täglich 11 bis 13 
Schneider (incl. 1512) 

täglich 13 bis 15 
Atari/MSX 

täglich 15 bis 17 
und TI 

täglich 17 bis 18 
Uhr als Gesprächstermin 
einzuplanen. 
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TEST 


PROHIBIBITION 


Vertane Programmierzeit 
für ein Videospiel 


Infogrames setzt mit seinem neue- 
sten Produkt gerade seinen guten 
Ruf aufs Spiel. Die Firma, die mit 
Highlights wie „Reisende im Wind“ 
einen sehr guten Namen erhielt, be- 
sinnt sich leider auf Ballerspiele. 
Grafisch und programmtechnisch 
zeigt sich das Spiel „Prohibition‘* 
in gewohnter Bestform. Dahinter 
steckt jedoch die übliche, stumpf- 
sinnige Idee dieses Genres. 


DER SPIELER ALSSÖLDNER — 


WIE IMMER EINE FRAGWÜRDI- 
GE IDEE 


Die New Yorker Polizei ist der zu- 
nehmenden Kriminalität der Stadt 
nicht mehr gewachsen. Viele Polizi- 
sten mußten im Kampf gegen die 


Unterwelt ihr Leben lassen und 
die Situation wird unerträglich. Es 
gibt nur eine Person, die dem Trei- 
ben ein Ende machen kann; und 
dieser Söldner sind Sie. 


Ihre Aufgabe besteht nun darin, 
alle Berufskiller und Mafiosi der 
Stadt brutal ‚auszuschalten‘. 

Wie das geht, dürfte mittlerweile 
aus Ähnlichen Spielen bekannt sein. 
Am besten, Sie schießen auf alles, 
was sich bewegt. 


Die Hintergrundstory zu Prohibi- 
tion erinnert sehr an die Handlung 
des Mastertronic-Produktes ‚Los 
Angeles Swat‘‘. Ebenso zweifelhaft 
dürfte die Motivation zum Spielen 
sein, denn es geht schlicht und 
einfach darum, möglichst viele Men- 
schen zu töten. 


Wie üblich: Infogames mit bestechender Grafik 


Wir haben jedoch bereits erwähnt, 
daß die Programmiertechnik und die 
grafische Qualität der Infograme- 
Software ihresgleichen sucht. Also 
kommen wir nicht darum herum, 
ein Spiel dieser Kategorie trotzdem 
zu besprechen. 


PRÄZISE JOYSTICKSTEUERUNG 


Sound und Grafik sind wahre Mei- 
sterwerke. Während des Ladens baut 
sich ein perfekt gezeichnetes Titel- 
bild auf, daf%? man leicht dem Irr- 
glauben verfallen kann, es sei 
digitalisiert. 

Zum Spielstart hat jeder die Möglich- 
keit, die vorgegebene Tastaturen zu 
ändern, was dringend zu empfehlen 
ist, da die vorgegebene Plazierung 


äußerst gewöhnungsbedürftig ist. 
Ideal ist natürlich die Joystick- 
steuerung. Damit bewegen Sie ein 
Fadenkreuz zu Beginn über eine 
Häuserfront. Der Bildschirm scrollt 
weiter und präsentiert ein neues 
Screen, sobald Sie den Rand er- 
reicht haben. Am linken Bildschirm- 
rand läuft ein Countdown, aus 

dem ersichtlich ist, wann der nächste 
Verbrecher sein Gewehr geladen 

hat und auf Sie schießen kann. Bis 
dahin sollten Sie ihn gefunden und 
ins Visier genommen haben, um 
ihm zuvorzukommen. Der Compu- 
ter erleichtert Ihnen die Suche, in- 
dem er durch Pfeile die Richtung 
anzeigt. Doch selbst wenn Sie den 
richtigen Bildschirmausschnitt vor 


sich haben, ist der Erfolg noch längst 


nicht sicher, denn die Gangster ha- 
ben sich oft gut versteckt. 


UNAPPETITLICHE GRAFIK BEI 


VERLUST EINES LEBENS 


Oft haben sie sich hinter einem Fen- 


ster verschanzt, ab und zu liegen sie 
auf den Dächern, manchmal schau- 
en sie sogar aus den Gullis heraus 
und legen ihr Gewehr auf Sie an. 
Sollten Sie es nicht schaffen, den 
Verbrecher in der vorgegebenen Zeit 
zu erschießen, dann färbt sich der 
Bildschirm rot, während laute Ma- 
schinengewehrschüsse ertönen. Auf 
diese makabre und geschmacklose 
Weise darf man dann seine drei 
Leben verlieren. Fortgeschrittene 
werden sich eventuell durch ein Aus- 
weichmanöver retten können, wel- 
ches zuvor durch die Tastendefini- 
tion festgelegt wurde. Dies gibt 

ein paar zusätzliche Sekunden Zeit, 
seine Haut zu retten. 

Manchmal kommt es allerdings vor 
— auch hier kannten die Program- 
mierer keinen Skrupel —, daß ein 
Gangster eine Geisel genommen hat. 
Dann darf selbstverständlich nicht 
ganz so freizügig in der Gegend her- 
umgeballert und es sollte etwas prä- 
ziser gezielt werden. Die Stadt New 
York dankt Ihnen jeden erschosse- 
nen Gangster mit einer beachtlichen 
Geldsumme. 


Prohibition 


Bedienung | 


Von Infogrames bei Waldeck 


TEST 


Die Grafik ist bedauerlicherweise 
sehr realistisch gehalten. Trifft man 
einen der Verbrecher, so reißt dieser 
die Arme hoch und sinkt langsam 
zusammen. Die Frage, was von die- 


FAZIT: VERSCHENKTE QUALI- 
TÄT AN EINE MIESE IDEE 


ser Darstellung zu halten sei, muß 
jeder für sich beantworten, es wäre 
jedoch Sarkasmus, den Program- 
mierern „Liebe zum Detail‘ nach- 
zusagen. Gleiches gilt für die Musik. 
Die durchaus fetzige Musik wird mit 


Hinter jedem Fenster kann ein Killer lauern 


Gute Darstellung der Häuserzeilen 


BR 
dem Sirren einiger Querschläger und 
dem Knattern der Maschinengeweh- 
re unterlegt. Ein unrühmliches Bei- 
spiel für die Sou.ndfähigkeiten des 
CPCs. Durch den rasanten Spielab- 
lauf bleibt Prohibition längere Zeit 
spielbar. In die Bewertung der Mo- 
tivation sollte ein solches Kriterium 
allerdings nicht eingehen. Hier geht 
es eben mehr um Spaß und Spiel- 
freude und davon ist beim Killen 
nichts zu spüren. So bleibt als 
Schlußbewertung nur ein „absolut 
nicht empfehlenswertes“ Pro- 
gramm übrig. (GS/C. Borgmeier) 


Berskurn." 
u 


NUN AUCH IN DEUTSCH 


Das Supertextverarbeitungsprogramm 


Prowort von Arnor im Test 


Vielen Besitzern wohl bestens durch den Maxam bekannt, 
ist sie nun auch in Deutschland direkt vertreten, die Firma Arnor, die mit 
ihren Produkten in England überdurchschnittliche Erfolge erzielt. 
Den Maxam, das Maschinensprache-Entwicklungspaket, haben wir früher 
schon getestet. Aber es gibt Neues von Arnor! So wurde beispielsweise der 
in England so überaus erfolgreiche Textprozessor (Textverarbeitungs- 
programm) Protext für den deutschen Markt angepaßt und überarbeitet. 
Dieses Textverarbeitungsprogramm gibt es für den CPC 6128 und für 
den Joyce (PCW 8256/8512). Ein guter Grund, es auf unserem Prüfstand 
auf Herz und Nieren zu untersuchen. Ob es den Preis von DM 249,— wert 
ist, können Sie diesem Artikel entnehmen. 


Aufwendiges Handbuch in stabiler Verpackung 


Ein paar Sätze, bevor wir zum ei- 
gentlichen Thema übergehen. 

Dieser Artikel besteht (thematisch 
betrachtet) aus zwei Teilen. Im er- 
sten Teil wollen wir Ihnen zeigen, 
wie ein Test bei uns abläuft, wel- 
che Punkte wir berücksichtigen und 
was wir unternehmen, wenn wir 
beim Test auf Probleme stoßen 

usw. Außerdem soll er auch aufzei- 
gen, mit welchen Problemen ein An- 
wender konfrontiert werden kann. 
Der zweite Teil ist unser Urteil 

nach dem Test, denn bei umfangrei- 
chen Programmen können wir un- 
möglich über alle Funktionen bzw. 
deren Verknüpfung miteinander 
berichten. 

Wie prüft bzw. testet man am besten 
ein Textverarbeitungsprogramm? 


Nun, ganz einfach, werden viele von 
Ihnen denken, man schreibt damit. 
Richtig, genauso wollten wir es 
auch handhaben. Also ran an Ar- 


nors so gepriesenen Textverarbeiter. 


VORBEREITUNG 


Doch vor der eigentlichen Arbeit 
damit müssen erst einige Vorberei- 
tungen getroffen werden. Gehen 
wir Schritt für Schritt vor, um den 
von uns gewonnenen Eindruck am 
besten an Sie weitergeben zu kön- 
nen. Zunächst einmal muß, damit 
kein Irrtum auftritt, noch einmal 
klargestellt werden, dieses Programm 
ist nicht auf einem normalen CPC 
464/664 lauffähig, denn es läuft nur 
unter CP/M Plus! Es ist also nur für 
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den Joyce und den CPC 6128 ge- 
dacht. Inwieweit es mit einem hoch- 
gerüsteten CPC 464, also mit nach- 
träglich eingebauter Speichererwei- 
terung, lauffähig ist, haben wir nicht 
getestet. Unsere Testkonfiguration 
bestand aus: 

Einem CPC 6128, einem Matrix- 
Drucker Citizen MSP10 und einer 
externen 3-Zoll-Diskettenstation 
(Zweitlaufwerk). 

Von Arnor lag vor: 

Ein Handbuch (ca. 318 Seiten Um- 
fang) und eine 3-Zoll-Programm- 
Diskette. 


TESTBEGINN 


Zunächst einmal wurde das mitge- 
lieferte Handbuch überflogen, um 
einen ersten Überblick zu gewinnen. 
Vorteilhaft war dabei die Tatsache, 
daß es komplett in deutscher Spra- 
che vorlag. 

Der Stil wurde gegenüber manchen 
anderen „Eindeutschungen“ als 
sehr angenehm empfunden, er er- 
laubte es, das Buch sehr flüssig zu 
lesen. Eine Wohltat, wenn man die 
oft nur „radebrechenden“ Hand- 
buchübersetzungen anderer Pro- 
gramme kennt. Hier also ein Plus- 
punkt, den sich Arnor Deutschland 
wirklich verdient hat. Es ist aber 
nicht alles Gold, was glänzt, denn 
leider ist das Handbuch für den 
Joyce und den CPC 6128 zuständig, 
wodurch es beim Anwender ab und 
zu etwas Verwirrung stiften kann, 
denn die Tastatur und die Tasten- 
belegung ist bei beiden Computern 
unterschiedlich. Diesen Punkt soll- 
te Arno verbessern, damit die 
Handbücher wirklich nur Sy- 

stem- und nicht Programm-bezo- 
gen werden. 


VORBEREITUNGEN 


Zunächst erst einmal eine Sicher- 
heitskopie der Originaldiskette an- 
gelegt. Hierzu wurde CP/M Plus ge- 
startet und Disckit3 aufgerufen. 
Da die Originaldiskette nicht mit 
irgendwelchen Schutzmechanismen 
versehen ist, ließ sie sich ohne Pro- 
bleme kopieren. (Ein weiterer 
Punkt, der uns angenehm auffiel!) 
Sicherheitskopien sind also über- 


haupt kein Problem. Die Original 
diskette wird im Data-Only-Format 
geliefert und enthält auf der A-Seite 
neben dem Hauptprogramm noch 
einige andere Dateien und auf Seite 
B ein Wörterbuch mit ca. 44000 
deutschen Wörtern. (Wir haben sie 
nicht nachgezählt und verlassen uns 
deshalb auf die Angabe von Arnor! 
Zwischenzeitlich haben wir noch 
einige hinzugeiost:) 

Nach Herstellung der Sicherheits- 
kopie wurde eine Startdiskette er- 
stellt. Hierfür wurde gleich die Si- 
cherheitskopie eingesetzt, denn sie 
entsprach ja dem Original. Die 
Startdiskette hingegen ist eine reine 
Arbeitsversion, auf welcher sich so- 
wohl das Betriebssystem CP/M 

Plus als auch alle für den Arbeitsab- 
lauf erforderlichen Dateien befin- 
den müssen. 

Wir gingen nach dem Handbuch vor. 
Dabei irritierte es uns, daß es bei 
der Vorgehensweise zur Erstellung 
der Arbeits-Diskette Unterschiede 
zwischen Joyce und dem CPC 6128 
gibt, die im Handbuch etwas stö- 
rend wirken. Da aber nicht jeden 
Tag eine Arbeitsdiskette erstellt 
werden muß, werten wir diesen 
Punkt nicht allzu negativ. Wir woll- 
ten bei diesem Test ja verschiede- 
nes herausfinden, so z.B.: Kann 
Otto Normalverbraucher (schon 
wieder der!) problemlos damit ar- 
beiten? Und dazu gehört eben auch, 
daß reine Programmanwender erst 
einmal in die Lage versetzt werden 
müssen, das Programm anzuwenden. 


KLEINE PROBLEME SIND FÜR 
NUR-ANWENDER ZU ERWARTEN 


Um wirklich alles zu überprüfen, 
folgten wir genau den Anweisungen 
des Handbuchs, obwohl wir manches 
(wie z.B. die Formatierung einer 
Diskette) auch ohne Anleitung 
fertiggebracht hätten (...doch, so- 
was schaffen wir schon!). Dabei fiel 
uns auf, daß das Handbuch einer- 
seits zwar sehr ins Detail geht, ande- 
rerseits aber beim Anwender auch 
ein gewisses Grundwissen erforder- 
lich ist, denn immer dann, wenn 
mehrere Möglichkeiten (z.B. unter- 
schiedliche Gerätekonfigurationen) 
bestehen, werden die Vorgänge nur 
allgemein beschrieben. 

Dies trifft beispielsweise auch für den 
Abschnitt ‚Eine Diskette formatie- 
ren“ zu. So wird zwar aufgefordert, 
die Diskette im Systemformat zu 
formatieren, aber die genaue Vor- 
gehensweise fehlt. 

Bleiben wir gleich bei diesem Menü- 
punkt. Trotz unseres guten Infor- 
mationsstandes hatten wir plötzlich 
den Verdacht, nicht über alles, was 


TEST 


Schneider so ausliefert, informiert 
zu sein. Ein für uns recht lustiger 
Punkt führte zu dieser Vermutung. 


GIBT ES FÜR DEN CPC 6128 
VERSCHIEDENE SYSTEM- 
DISKETTEN-VERSIONEN? 


Denn wir schienen eine andere Ver- 


sion von Disckit 3 vorliegen zu ha- 
ben als Arnor. Es wäre auch durch- 
aus denkbar gewesen, daß es von 
Schneider verschiedene Systemdis- 
ketten für CP/M Plus gibt, denn bei 
uns lag eine Version vor, bei wel- 
cher im Programm Disckit3 die 
Option eine weitere Diskette zu for- 
matieren nicht mit ‘“‘J“ (wie im 
Handbuch für PROWORT angege- 
ben), sondern mit “Y‘“‘ gewählt wer- 
den mußte. Die Nachfrage bei 
Schneider ergab: Es gibt nur eine 
Version für den CPC 6128! Dieser 
kleine Handbuch-Bug (Fehler) ist 
sicher bei der Übersetzung gesche- 
hen. Vermutlich geschah im Rah- 
men der Eindeutschung des Hand- 
buches eine automatische oder halb- 
automatische Umsetzung und da 

ist es dann eben leider passiert, es 
wurde zuviel übersetzt! 

Anfänger werden dieses Problem 
sicherlich meistern und irgendwann 
dann doch die Taste “Y‘‘ drücken. 
Auch von uns wurde diese kleine 
Klippe sehr schnell umschifft und 
es konnte fortgefahren werden. 


STARTDISKETTE 
= ARBEITSDISKETTE 


Als nächstes stand an, die Startdis- 
kette zu erzeugen. Dieser Vorgang 
wird durch Eingabe von 
PROWORT <MAKECPC 
automatisch durchgeführt. Dem 
Anwender werden hierzu vor dem 
eigentlichen Erzeugungslauf noch- 
mals verschiedene Hinweise auf 
dem Bildschirm ausgegeben. So 
z.B. die Vorgehensweisen bei einem 
oder zwei Laufwerken. Außerdem 
ist immer zu sehen, was gerade ab- 
läuft. Nach kurzer Zeit ist der 
Vorgang abgeschlossen. Als näch- 
stes ist die Erstellung der Wörter- 
buch-Diskette an der Reihe. Da wir 
strikt nach dem Handbuch vorge- 
hen, wird vorher das System zu- 
rückgesetzt und gleich mit der 
Startdiskette die Arbeit aufge- 
nommen. 


BISHER ALLES BESTENS 


Nach dem Booten von CP/M wird 
die Startup-Sequence durchgeführt. 
Dabei prüft PROWORT z.B. ab, 

ob bereits eine Konfigurationsda- 
tei vorliegt. Da diese von uns aber 
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noch nicht erstellt wurde, fuhr dann 
das Programm weiter fort. Nach 
dem gesamten Ladevorgang er- 
scheint ein sogenannter SPLIT- 
SCREEN, also ein geteilter Bild- 
schirm. Im unteren Teil wartet das 
Programm nun auf Befehle. Im obe- 
ren wird der Text eingegeben. Die 
Umschaltung von einem Schirmteil 
in den anderen erfolgt mit der ESC- 
Taste. 

Zur Erstellung (Kopie) der Wörter- 
buchdiskette wird DKOPIE, ein 
mitgeliefertes Dienstprogramm, auf 
gerufen. Die Funktion dieses Pro- 
grammes entspricht der Copy-Funk- 
tion von Disckit3. Nach dem Auf- 
ruf erfolgt programmgesteuert die 
Aufforderung, nun die entsprechen- 
den Disketten in die Laufwerke 
einzulegen. Danach wird durch den 
Programmstart (‘“S“) ein Duplikat 
des Wörterbuches erzeugt. 

Im Handbuch geht es dann weiter 
mit dem Hinweis, daß nun zwar 
schon mit PROWORT gearbeitet 
werden kann, aber daß dennoch die 
sog. Konfiguration vorgenommen 
werden sollte. Wenn Arnor es für 
gut hält, bitte sehr, konfigurieren 
wir eben. 

Spaß beiseite, die Konfiguration 
dient vor allem dazu, welcher Druk 
ker angeschlossen ist und wieviele 
Laufwerke vorhanden sind. Eigent- 
lich hat CP/M Plus letzteres zwar 
schon bemerkt, aber gut, sagen wir 
es dem Programm auch noch. 


NICHT ALLES IST FÜR DEN 
CPC 6128 ERFORDERLICH 


Laut Handbuch wird für drei ver- 
schiedene Drucker (PCW, Epson 
und Juki6100) der Druckertreiber 
mitgeliefert. Ein kurzer Blick ins 
Disketteninhaltsverzeichnis bestätigt 
dies. Was ein CPC mit dem Drucker- 
treiber für den PCW-Drucker soll, 
wissen wir auch noch nicht, aber 
vielleicht kann man mit diesem ja 
irgendeinen anderen „wilden“ 
Drucker ansteuern. Im Handbuch 
haben wir bisher nur den Hinweis 
gefunden, daß er für den Standard- 
PCW-Drucker ist. Falls dies der 

Fall ist, dann wäre es sinnvoll ge- 
wesen, daß das Programm zur Er- 
stellung der Startdiskette diesen gar 
nicht mitkopiert, denn der Disket- 
tenplatz ist nun schon (mit noch 

30 freien KB) knapp. . 
Wenn einer der vorliegenden Druk- 
kertreibern bereits eingesetzt wer- 
den kann, dann kann dieser als 
Standard-Druckertreiber in der Da- 
tei KONFIG definiert werden. 

Der MSP10, der bei uns angeschlos- 
sen war, ist epsonkompatibel, des- 
halb muß eigentlich alles schon 


stimmen, was den Druckertreiber 
betrifft. Das Programm DRUCK 
WÄHL (Filename DRUCKW.COM) 
brauchte deshalb nicht aufgerufen 
zu werden. 

Der nächste Punkt ist die Konfigu- 
ration der Diskettenlaufwerke. Ei- 
gentümer eines CPC 6128 ohne 
zweites Laufwerk haben hier keine 
Qual der Wahl, wohin die von 
PROWORT erzeugten temporären 
Dateien ausgelagert werden sollen. 
Bei zwei Laufwerken sollte Lauf- 
werk B als „Zwischenspeicher“ be- 
nutzt werden. 

Da wir ja mit zwei Laufwerken ar- 
beiten wollten, wurde nun das Pro- 
gramm KONFIG aufgerufen. Nach 
dem Start erschien ein Auswahlme- 
nü mit zehn Menüpunkten, die aber 
nur zum Teil für den CPC zutreffend 
sind. Was soll auch der Punkt 5 
“Tasten für PCW8256/8512 definie- 
ren“ bei einem CPC? Gut, das Pro- 
gramm ist für beide Maschinen ge- 
dacht, für den Anwender sinnvoll 
ist es aber nicht, wenn Punkte, die 
für den eigenen Computer nicht zu- 
treffen, vorhanden sind. 

Als erstes sahen wir uns den ersten 
Menüpunkt, “Editor-Optionen de- 
finieren‘ an. Hier wäre es möglich 
gewesen, das Standard Laufwerk 
für den Text, die ee 
pe für diesen, das Löschpuffervolu- 
men usw., usw. einzustellen. 

Mit den Voreinstellungen waren wir 
aber zufrieden und wollten deshalb 
wieder ins Hauptmenü. Im Hand- 
buch steht, daß dies durch Drücken 
der STOP-Taste geschehen kann. So 
sehr wir die Tastatur auch absuch- 
ten, sie war nicht zu finden, denn 
der CPC 6128 hat keine Taste mit 
dieser Bezeichnung. Aus der Erfah- 
rung heraus (eine Gegenüberstel- 
lung verschiedener Tasten steht be- 
reits auf den ersten Seiten des 
Handbuches) tippten wir auf die 
ESC-Taste und richtig, sie war es! 
Wir landeten wieder im Hauptmenü! 
Da wir alles sehr sorgfältig und ge- 
nau nach Handbuch durchführten, 
waren nun ca. 60 Minuten vergan- 
gen. Dabei entfielen ca. 10 Minuten 
für die Aktivitäten am Computer 
und die andere Zeit für das Studium 
des Handbuches sowie der 
Überprüfung verschiedener Menüs 
etc. 

Nun aber war es soweit, die Disket- 
ten waren erstellt und der erste 
Text sollte mit PROWORT geschrie- 
ben werden. Notizen über den bis- 
herigen Testverlauf waren bisher auf 
einem anderen Computer geschrie- 
ben worden und nun sollte es ernst 
werden. Der Artikel selbst sollte 
gleich auf dem CPC unter PRO- 
WORT entstehen. 


TEST 


Übersichtliche Bildschirmdarstellung 


Tja, so hatten wir gedacht, aber es 
ging noch nicht, denn die Bedienung 
des Programmes war noch nicht ganz 
klar und auch die deutsche DIN- 
Tastatur stand noch nicht zur Ver- 
fügung. Also erst weiteres Studium 
des Handbuches. Vor allem suchten 
wir nach dem Hinweis für die Um- 
laute. Auf dem Bildschirm waren 
verschiedene deutsche Umlaute zu 
sehen, also mußte es doch möglich 
sein, diese auch einzugeben. 


WER SUCHT — DER FINDET! 


Im Kapitel Optionen, dort geht es 
um Sonderzeichen, wurden wir fün- 
dig. Da stand für den CPC unter 
CRTL-3 “Umlaut‘'! Nur, das half 
im Moment auch nicht gleich wei- 
ter, da wir davon ausgingen, daß 
die Umlaute auf der Tastatur so 
vorhanden sein sollten, wie es im 
“Zehnfinger-Blind-System‘““ gelehrt 
und erlernt wird. Im ersten Moment 
glaubten wir, mit der dort angege- 
benen Tastenkombination könnte 
auf Umlaute umgeschaltet werden 
oder beim Umdefinieren der Tasten 
könnte diese Kombination die ge- 
wünschten Zeichen erzeugen. Aber 
weit gefehlt, mit dieser konnten 
Umlaute nur erzeugt werden, aber 
nicht durch einen einzigen Tasten 
druck! Die Vorgehensweise hierzu 
war, den normalen Vokal (Selbst- 
laute a, 0, u) einzugeben und mit 
CTRL-3 die Pünktchen darüberzu- 
setzen! 

Das durfte doch nicht wahr sein! 
Telefongespräch mit Arnor 
Deutschland und England bestätig- 
ten aber diese für uns Deutsche 


12 


undenkbare Methode, führten an- 
dererseits aber auch dazu, daß 
Arnor nun erst die eigentliche Pro- 
blematik verstand. Anscheinend 
hielt man unsere Umlaute für Son- 
derzeichen, so wie die Akzentzei- 
chen in der französischen Schrift. 


PROBLEM ERKANNT UND 
GELÖST! 


Nachdem nun alles klar war, wurde 
uns zugesichert, daß wir so schnell 
wie möglich ein ‚„‚Update“, also ei- 
ne neue Programmdiskette, erhalten 
sollten. Nach ein paar Tagen traf 
diese auch ein. Und siehe da, PRO- 
WORT verstand auf Anhieb 
deutsch. Eine Konfigurationsdatei 
ermöglichte es. 

Bis zum Eintreffen der neuen Ver- 
sion aber waren wir nicht untätig. 
Wir testeten weiter und begeisterten 
uns so richtig für das Programm, 
denn es ist außergewöhnlich lei- 
stungsfähig. All die Möglichkeiten, 
die PROWORT bietet, aufzuzählen, 
wäre im Rahmen eines Testberich- 
tes nicht möglich, so daß nur wenige 
stellvertretend genannt werden kön- 
nen. Interessenten, die noch mehr 
wissen wollen, können sich ja Pro- 
spektmaterial von Arnor zusenden 
lassen und wir sparen Platz im 

Heft. 

Ein paar wenige Punkte der PRO- 
WORT-Möglichkeiten seien trotz- 
dem genannt: 

Einlesen und Konvertierung von 
WordStar-Texten, Blocksatz links- 
bündig, Flattersatz, Betriebsmodis 
Einfügen/Überschreiben, Anzeige 
oder Unsichtbarmachen der Steuer- 


zeichen für den Drucker, Einfügen 
verschiedener Lineale in den Text, 
Austausch zweier Zeichen (für 
„Buchstabenverdreher‘ wie mich 
eine hilfreiche Unterstützung), 
dauernder Zugriff auf viele Hilfs- 
menüs, Bearbeitung von zwei Do- 
kumenten quasi gleichzeitig, alle 
nur denkbaren Blockbefehle, 
Suchen/Ersetzen vorwärts — rück- 
wärts — global — Groß-/Klein- 
schrift, Kopf- und Fußnotendruck, 
Mailmerge-Funktion, Wortzähler, 
Hintergrunddruck und _ gleichzei- 
tige Bearbeitung anderer Doku- 
mente, und...und...und. 
Die Hilfsmenis, die in den unteren 
Bildschirmzeilen eingeblendet wer- 
den, sind in sinnvolle Gruppen auf- 
geteilt und können auf einfache 
Weise ab- oder weitergeschaltet 
werden. 
Es gibt zuviele Punkte, über die 
wir berichten könnten, aber irgend- 
wo müssen wir aufhören, denn 
sonst nimmt der Testbericht den 
Umfang des zum Programm gehö- 
rigen Handbuches an und das ist 
auch nicht das Wahre. 
Unbedingt erwähnt werden muß 
aber das im Lieferumfang enthalte- 
ne Rechtschreibprüfprogramm, 
denn die meisten Textverarbeitungs- 
BEOBraEae dieser Preisklasse ver- 
ügen nicht über einen derartigen 
„Spell-Checker“. Falls es aber 
— meinen Unkenrufen zum Trotz — 
zu diesen überhaupt einen derarti- 
gen „Korrektor“ gibt, dann muß 
er nachgekauft werden. Wenn man 
dann noch Pech hat, dann stolpert 
dieser auch noch über unsere Um- 
laute oder das ‚‚scharfe S“. Es gibt 
also gute Gründe, weshalb wir uns 
dieses Hilfsprogramm etwas näher 
angesehen haben. 
Tja, was soll man viel sagen, weder 
Umlaute noch “ß“ brachten 
“SPELL“ aus der Ruhe. Er gibt die 
Worte, die er nicht kennt aus und 
wartet, ob man sie korrigiert, in 
das Wörterbuch aufnimmt, nach 
ähnlichen Worten nachschlägt oder 
ignoriert. Das Nachschlagen nimmt 
zwangsläufig einige Zeit in Anspruch. 
Suchen Sie doch einmal ein kom- 
lettes Wörterbuch nach ähnlichen 
örtern durch, dann wissen Sie 
wie langwieirg das ist, und genau 
das wird durch die Funktion Nach- 
schlagen ausgelöst! Da durch unse- 
re Arbeiten dem Wörterbuch viele 
Wörter, die ihm noch nicht bekannt 
waren, beigebracht wurden, beka- 
men wir auf unseren gewollten 
Schreibfehler „Doppeldreck“ über 
die Funktion N (Nachschlagen) 
den Vorschlag ‚„Doppeldruck“ und 
das war korrekt, dieses Wort hat- 


ten wir gemeint. Bei gemischter 
Groß-/Kleinschreibung, also bei- 
spielsweise dem Wort KonFIG, 
warnt SPELL und dann haben Sie 
auch wieder verschiedene Möglich- 
keiten, weiterzumachen. Die Aus- 
gaben beim Programmlauf von 
Spell erfolgen nur in Kleinschrift. 
arum sollte ein Programm auch 
wissen, daß wir in Deutschland am 
Satzanfang den ersten Buchstaben 
eines Wortes groß schreiben, mitten 
im Satz das gleiche Wort aber 
klein? Für eine Rechtschreibprü- 
ra ist es eigentlich nicht erforder- 
ch. 


Proword - Textverarbeitung 


Bei Arnor (Deutschland) . 


Nach dem „Prüfungslauf“ wird eine 
kleine Statistik ausgegeben, die mit- 
teilt, wieviele Wörter getestet wur- 
den, wieviele verschiedene Wörter 
enthalten sind, Sie erfahren die An- 
zahl der nicht bekannten Wörter, 
die Anzahl der neu eingetragenen 
und die Anzahl der Korrekturen. 
Erwähnenswert ist noch, daß SPELL 
auch als eigenständiges Programm 
auf CP/M-Ebene verwendet werden 
kann. Sie sehen, die Features von 
PROWORT sind wirklich sehr viel- 
fältig und wir hätten durch die Viel- 
falt fast vergessen, Ihnen mitzuteilen, 
daß im Text auch gerechnet wer- 
den kann. 


UNSER URTEIL: 


Wenn bei dem einen oder anderen 
Leser der Eindruck entstanden sein 
mag, daß das getestete Programm 
(eigentlich nur das Handbuch) eini- 
ge Kinderkrankheiten aufweist, 
dann liegt es nur daran, daß wir un- 
seren Test sehr kritisch und gewis- 
senhaft durchführten. Andere Pro- 
gramme wären hierbei weit schlech- 
ter weggekommen. PROWORT ge- 
hört mit zum Besten, was es auf 
dem Gebiete der CPC-Textverarbei- 
tung gibt. 

Als Tester sollte man mit Über- 
schwenglichem Lob bekanntlich 
vorsichtig sein (es kann ja noch was 
Besseres kommen!). Trotzdem: 

Das Textverarbeitungsprogramm 
PROWORT schlägt alles, was es bis- 
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her an Textverarbeitern für den 
CPC 6128 gab. Nicht ganz unschul- 
dig an diesem Urteil ist das mitge- 
lieferte Rechtschreibprogramm. 
Aber auch andere Punkte sind für 
diese Bewertung zuständig. Es bie- 
tet weit mehr Möglichkeiten und 
Features als WordStar 3.0, das bis- 
her wohl professionellste Textver- 
arbeiter für einen CPC 6128. Es 
muß aber auch ganz klar festgestellt 
werden, daß — gerade durch den 
enormen Umfang an Möglichkeiten 
— die Bedienung nicht innerhalb 
von 10 Minuten erlernt ist. Für den- 
jenigen, der im Monat ein Schrift- 
stück verfaßt, ist es sicherlich nicht 
das sinnvollste Programm. Für Viel- 
schreiber aber ist es ein Werkzeug, 
das begeistern kann. 

Wer vom CPC 6128 auf den Joyce 
umsteigt, kann mit dem gleichen 
Programm weiterarbeiten, ohne viel 
umlernen zu müssen. 


Außer einigen Kleinigkeiten (inklu- 
sive der anfangs nicht vorhandenen 
deutschen Tastatur) konnten wir 
keine groben Fehler entdecken. 

Der Umgang mit dem Arnor-Pro- 
dukt ist dann, wenn man die Vor- 
gehenslogik verstanden hat, äußerst 
einfach. Interessant ist auch noch, 
daß es im August ’87 die PC-Version 
(PROTEXT-PC) in Englisch und 
etwa Ende Oktober ’87 die deutsche 
Version PROWORT--PC geben soll. 
Wenn die Beschreibungen im Hand- 
buch nochmals überarbeitet werden 
und die kleinen Fehler korrigiert 
würden, dann gäbe es keinerlei 
Punkte zu beanstanden. Positiv 
überrascht hat uns die schnelle Reak- 
tion Arnors auf unsere Bemänge- 
lung bezüglich der deutschen An- 
sprüche, £ 


TEST 


STARFOX: 


RETTEN SIE HYTURIAN 


Im fernen Universum gibt es ein Pla- 
netensystem, in dem schon seit Jahr- 
hunderten Frieden herrscht. Doch 
jetzt kündigt sich eine kosmische 
Katastrophe an: Der Schutzwall, der 
dieses System schützt, ist durch ei- 
nen Riß beschädigt worden und der 
Weg ist frei für die Feinde der fried- 
lichen Siedler. 

Dabei hatten die Bewohner von 
Hyturian geglaubt, ihr Schutzsy- 
stem halte alle Feinde ab, ihren 
Frieden zu stören. Sie bauten um 
ihr Planetensystem einen Schutz- 
wall aus acht Planeten, den sie 
Rubikon nannten. Außerdem schütz- 
ten sie noch jeden dieser acht Plane- 
ten durch einen Tubus, der ihn un- 
sichtbar machte. Doch nun war die- 
ser Rubikon gefährdet, denn ein 
Riß in diesem System drohte und 
ermöglichte ihren Feinden, die 
schon immer dieses friedliche Sy- 
stem unterjochen wollte, ein leich- 
tes Eindringen. 

Doch zum Glück wurde De sein 
der neueste Raumjäger u it, 
und dieser ‚„Starfox‘“ war ein Wun- 
der der galaktischen Technik. Noch 
fand sich kein Freiwilliger, der das 
Wagnis auf sich nahm, um die Ein- 
dringlinge zu vernichten. 

Zum Glück für die Bewohner von 
Hyturian meldeten Sie sich für die- 
sen gefahrvollen Einsatz. Also, 
schwingen Sie sich ins Cockpit! 
Kaum haben Sie auf dem Piloten- 
sitz Platz genommen, werden Sie 
erstaunt feststellen, daß die Kon- 
trolle über diesen Raumjäger gar 
nicht so schwer ist. Denn neben dem 
Blick nach vorn durch das Panora- 
ma-Fenster bieten Ihnen auch zwei 
seitliche Screens und ein Bildschirm 
für den Blick nach hinten gute Vor- 
aussetzungen, nie den Überblick 
über das Geschehen im Raum zu 
verlieren. 


GUTE ORIENTIERUNG DURCH 
DREIDIMENSIONALEN 
RAUMWÜRFEL 


Außerdem bietet Ihnen der Holo- 
cube, ein dreidimensionaler Raum- 
würfel, die beste Möglichkeit, sich in 
dem Planetensystem zu orientieren. 
Durch Druck auf die H-Taste wird 
er aktiviert und zeigt Ihnen Ihren 
Standort im Raum-Koordinatensy- 


stem an. Aber auch der Standort 
feindlicher Schiffe wird signalisiert. 
Dieser Raumwürfel kann um alle 
drei Achsen mit Hilfe des Joysticks 
gedreht werden und bietet als Beson- 
derheit noch die Möglichkeit der 
Vergrößerung durch Zoom-Effekte. 
Um die acht Planeten des Hyturian- 
Systems kreist je ein Mutterschiff, 
auf dem Sie Ihren Raumjäger im 
Bedarfsfall reparieren lassen können. 
Außerdem erhalten Sie dort kosten- 
losen Treibstoff sowie die neuesten 
Waffensysteme. Denn nach dem 
Start der „Starfox“ haben Sie ledig- 
lich eine Laserkanone an Bord. 
Also, fliegen Sie zunächst einen 
Planeten an und versorgen Sie sich 
mit Waffen und Treibstoff! 

Doch so leicht ist die Aufgabe nicht! 


Starfox: Blick durchs Cockpit 


Denn leider wissen Sie nicht, wo 
sich die Planeten befinden. Also, 
machen Sie sich auf die Suche nach 
einem Planeten. Durch Einschalten 
der Turbo-Triebwerke (T-Taste) 
jagen Sie durch den Weltraum. 
Wenn ein Planet in den Abtastbe- 
reich des Scanner-Weltraumradars 
kommt, wird dies signalisiert. 

Nun können Sie den Autopiloten 
einschalten, indem Sie den Welt- 
raum-Log einschalten (Taste 2) und 
den gefundenen Planeten aufrufen. 
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Der Autopilot wird Ihren Starfox 
sicher zum Beginn der Einflug- 
schneise zum Planeten bringen. 
Nach dem Durchqueren der Ein- 
flugschneise befinden Sie sich in 
der Umlaufbahn des Planeten. 
Wenn dann das Mutterschiff in 
Sichtweite kommt, beginnt das 
Andock-Manöver, das an Sie, den 
Piloten der Starfox, erhöhte Anfor- 
derungen stellt. Denn Sie müssen 
Ihren Jäger genau in die richtige 
Position zum Docken bringen, also 
nicht zu schnell und nicht zu lang- 
sam. Haben Sie die richtige Posi- 
tion erreicht, werden Sie von den 
Traktorstrahlen erfaßt und die 
automatische Landung beginnt. 
Nach dem Andocken können Sie 
sich die Waffen wählen, die im 


Kampf gegen die Eindringlinge 
nötig sind. Dabei wird automatisch 
auch Ihr Treibstoffvorrat ergänzt 
sowie eventuell erforderliche 
Reparaturen durchgeführt. 
Beachten Sie bei der Waf fenauswahl, 
daß Sie in jedem Level von jedem 
der acht Planeten nur einmal neue 
Waffen erhalten! Jeder Planet bietet 
Ihnen nur vier der insgesamt acht 
Waffenpakete an, wobei Sie der 
Auswahl besondere Beachtung 
schenken sollten. Denn sie werden 


nicht immer in der Reihenfolge 

ihrer Stärke und ihrer Wirkung an- 
geboten. Merken Sie sich also, wel- 
che Waffe was kann, denn sonst er- 
leben Sie unangenehme Überraschun- 
gen, denn auch Ihr Gegner schläft 
nicht und verstärkt seine Waffen 
ständig. Also, seien Sie auf der Hut, 
denn immerhin geht es um die Frei- 
heit von Hyturian. 


Anschließend fliegen Sie wieder zu- 
rück in den Weltraum und suchen 
den nächsten Planeten auf, um dort 
andere Waffensysteme an Bord zu 
nehmen. Treffen Sie auf dem Weg 
dorthin auf Feindschiffe, so grei- 
fen Sie an und zerstören alles, was 
sich Ihnen in den Weg stellt. 


KEINE GNADE MIT DEN 
EINDRINGLINGEN: SCHIESSEN 
SIE ALLES AB, WAS SIE 
TREFFEN 


Aber achten Sie auf den Treibstoff- 
vorrat. Brechen Sie lieber rechtzei- 

tig einen Kap! ab und suchen Sie 

den nächsten Planeten auf, bevor 


Sie derjenige sind, der im Kampf 


Der Feind als Vektorgrafik 


mit den Eindringlingen in den 
Weiten des Universums verglüht! 
Um Ihre jeweilige Bewaffnung zu, 
kontrollieren, haben Sie die Möglich- 
keit, das allgemeine Log (Taste 1) 
aufzurufen. Dann wird Ihnen die 
aktuelle Bewaffnung angezeigt so- 
wie die Position von eventuellen 
Eis- oder Elektronenstürmen. 
Fliegen Sie mit Turbo-Geschwindig- 
keit in einen solchen Sturm hinein, 
so sind Schäden am Starfox-Raum- 
jäger unvermeidbar. 


_ TEST 


Dieses von Ariolasoft vertriebene 
Spiel ist in der oberen Mittelklasse 
einzuordnen, wenn man Spaß an 
dieser Art der Weltraum-Baller- 
Spiele hat. Es hat genau den rich- 
tigen Schwierigkeitsgrad, nicht zu 
leicht, daß man gleich beim ersten 
Mal schon unbesiegbar ist. Auf der 
anderen Seite aber auch nicht zu 
schwer, daß man das Programm 
frustriert zur Seite legt. Also ge- 
nau richtig für die Joystickakro- 
baten. 


EIN SPIEL DER GE- 
HOBENEN MITTELKLASSE 


Die Grafik gehört zur CPC-Spitzen- 
klasse, nicht nur in der allgemeinen 
grafischen Gestaltung, sondern auch 
in der Farbgebung. Trotz der um- 
fangreichen Tastenbelegung ist es 
nicht schwer zu handhaben, auch 
wenn man sich, wie bei jedem Spiel, 
erst zurechtfinden muß. 

Der Sound fällt allerdings erheblich 
ab. Bis auf einige Aktion-Geräu- 
sche ist keiner vorhanden. Eigent- 
lich schade. 


Grafik | 
Sound | 
[Notivation! 
[Bedienung | 
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ISHADOW 


Ein neues „shoot’em up“-Spiel, das 
im 23. Jahrhundert spielt, ist dieses 
„Shadow Skimmer“. Dabei sind Sie 
der Offizier, der bei einem Routine- 
auftrag von dem Abwehrsystem sei- 
nes Mutterschiffes angegriffen wird. 


DER COMPUTER SPIELT 
VERRÜCKT. ÜBERLISTEN 
SIE IHN! 


Zu den Pflichten eines Offiziers an 
Bord eines instellaren Raumkreuzers 
gehört die regelmäßige Wartung der 
Abwehrsysteme an der Außenhülle 
des Raumschiffes. Eigentlich eine 
Routineangelegenheit, so wie sie 
jeden Tag immer wieder abläuft. 
Normalerweise ist diese Inspektion 
innerhalb von 30 Terra-Minuten er- 
ledigt, aber nicht an diesem Tag. 


DER KAMPF MIT DER TECHNIK: 
EIN KAMPF AUF LEBEN 
UND TOD 


Denn an diesem Tag geht alles 


I schief. Eine Fehlfunktion des Bord- 


computers führte dazu, daß aus der 
alltäglichen Wartung ein Abenteuer 
auf Leben und Tod wird. Denn als 
die Außeninspektion beendet war, 
klemmte ein Schott und dadurch 
wurde der Bordcomputer in seiner 
Abwehrfunktion aktiviert, was 
normalerweise gar nicht sein 
dürfte. 

Und nun stand der Inspektionsoffi- 
zier vor dem Problem, das Sicher- 
heitssystem, das gegen fremde Ein- 
dringlinge schützen sollte, zu über- 
listen. Denn nur so konnte er wie- 
der in sein eigenes Schiff zurückkeh- 
ren. Und die Zeit drängte, denn 
sein Sauerstoffvorrat war auch 
nicht unbegrenzt. Und außerdem 
bestand die Gefahr, daß die eigene 
Abwehrsysteme seinen Raumglei- 
ter zerstäuben. 


DESAKTIVIEREN SIE DIE 
SICHERHEITSSYSTEME 


Der einzige Weg zurück führt 
durch die Hauptpersonenschleuse 


Shadow Skimmer: Verwirrende, aber detaillierte Grafik 


am anderen Ende des Sternenkreu- 
zers. Und dazu muß er mit sei- 
nem Gleiter alle Sicherheitssyste- 
me desaktivieren. Das Dumme dar- 
an war nur, daß diese Dedektoren 
so versteckt in den drei Rumpf- 
sektoren liegen, dais sie ohne Lage- 
plan nur sehr schwer auffindbar 
sind. 


Und außerdem sind sie nahezu un- 
zerstörbar. Da aber der Komman- 
dant des Raumschiffes keine Mög- 
lichkeit hatte, diese Abwehrmecha- 
nismen vom .Kommandozentrum 
aus abzuschalten, blieb dem Offi- 
zier nichts weiter übrig, den Kampf 
mit der eigenen Technik aufzuneh- 
men und sich der Aufgabe zu stel- 
len. Er mußte also sein eigenes 
Schiff beschädigen, um sein eige- 
nes Leben zu retten. Doch was 
bleibt ihm anderes übrig, um sein 
eigenes Leben zu retten? 


ÜBERLISTEN SIE DIE ABWEHR- 


SYSTEME DES MUTTERSCHIFFS 


Der Gleiter ist zum Glück mit drei 
Energieabwehrschirmen ausgestat- 
tet. Der Zustand dieser Schirme 
wird am Kontrollpult angezeigt. 
Wenn der Gleiter allerdings mehrere 
Treffer erhält, bricht der Schirm 
zusammen. 


Als aktive Bewaffnung stehen starke 
Impulslaserwaffen zur Verfügung. 
Und mit denen kann sich unser 
Offizier schon wehren und die Ab- 
wehrsysteme seines Mutterschiffes 
ausschalten. 


So muß er sich also durch die drei 
Sektoren kämpfen und dabei in je- 
der Sektion die Steuergeräte der 
automatischen Abwehrsysteme zer- 
stören. Finden Sie selbst heraus, 
wo diese Geräte sich befinden. 

Ein Tip: Sie sind gekennzeichnet 
mit einem Kreuz. 


Ab und zu muß er auch in den 
Rumpf des Mutterschiffes eindrin- 
gen. Um die Luken zu öffnen, muß 
dann, wenn sich der Gleiter über 
der Luke befindet, der Feuerknopf 
gedrückt werden, dann geht das 
Schott auf und die Suche kann 
weitergehen. 


DER GLEITER KANN AUCH 
ROLLEN 


Manchmal ist es erforderlich, sich 
unter den Aufbauten hindurchzu- 
zwängen. Das geht nur, wenn der 
Gleiter auf dem Kopf fliegt. Dazu 
muß der Gleiter gerollt werden. 
Das vermindert zwar die Flugge- 
schwindigkeit, ist aber die einzige 
Möglichkeit, durch solch enge Stel- 
len hindurchzukommen. Der Glei- 


ter kann allerdings nur gedreht wer- 


den, wenn sich auf diesem Deck 
sonst keine Hindernisse befinden. 
Zum Glück wird die Nummer des 
Sektors auf dem Kontrollpult stän- 
dig angezeigt, so daß die Orientie- 
rung nicht verlorengeht. 


Das Ziel befindet sich in der dritten 
Sektion. Dort gelangt dann der Offi- 


zier wieder in das Mutterschiff hin- 


ein, wenn er alle gefährlichen Augen- 


16 


blicke gut überstanden hat. Hoffent- 
lich geht dann die nächste Inspek- 
tion glatter vonstatten. 


STEUERN SIE DEN GLEITER 
MIT DEM JOYSTICK 


Zur Steuerung steht der Joystick 
zur Verfügung. Wenn Sie jedoch die 
Tastatur bevorzugen, gilt folgende 
Tastenbelegung: Q=Links, A= 
Rechts, O=Aufwärts, P=Abwärts, 
Leertaste=Feuer, Return=Rollen. 
Bei Benutzung des Joysticks kann 
die Rollbewegung mit jeder beliebi- 
gen anderen Taste ausgelöst werden. 
Die Steuerung wird allerdings da- 
durch erschwert, daß bei der Suche 
nach den Abwehrzentren der Glei- 
ter immer wieder von herumschwir- 
renden Gegenständen getroffen wird. 
Durch den Aufprall wird der Gleiter 
manchmal erheblich aus der vorge- 
sehenen Flugbahn geworfen. Mit 
dem Joystick muß die Richtung 
dann wieder korrigiert werden. 


SHADOW SKIMMER: 
EIN EMPFEHLENSWERTES SPIEL 


Dieses Spiel ist endlich mal wieder 
eins, das ohne Einschränkung emp- 
fohlen werden kann, wenn man 
Freude an diesen Ballerspielen hat. 
Denn die Grafik gehört auf dem 
CPC zur Spitzenklasse. Allerdings 
kommt diese gute Grafik nur bei ei- 
nem Colour-Monitor richtig zur Gel- 
tung. Der Sound, der abgeschaltet 
werden kann, ragt ebenfalls aus der 
Masse der käuflichen Software her- 
aus. Die Motivation, dieses Spiel 
immer wieder zu spielen, ist groß, 
da die Schwierigkeiten gerade rich- 
tig bemessen sind. Also nicht zu 
leicht, aber ebensowenig allzu 
schwer. Gerade das richtige Maß. 
Wenn Sie also ein Spiel suchen für 
die kommenden grauen Herbsttage, 
dann werden Sie den Kauf dieses 
Spieles nicht bereuen. Oder noch 
einfacher: Lassen Sie es sich schen- 
ken! (JE) 


0 &ı Sn A 


Von Edge hei ariolasoft 


DIE NOT MIT 
LADEPROGRAMMEN 


Ich habe ein Abonnement 


für Schneider aktiv und 
muß Ihnen bestätigen, 
daß ich schon so manches 
schöne und nützliche 
Programm abgetippt ha- 
be. Doch es ist jetzt das 
zweite Mal, daß ich ein 
Programm einfach nicht 
starten kann. Diesmal 
handelt es sich um den 
„Disc-Monitor“ aus Heft 
7/87. In Ihrer kurzen und 
knappen Beschreibung 
zum Programm heißt es 
lapidar: „Disc wird ein- 
fach mit RUN gestartet.“ 
Das war wohl nichts. 

Da das Lade- und Haupt- 
programm gleiche Zeilen 
aufweist (Zeilen-Nume- 
rierung) ist es doch nur 
möglich, die beiden Pro- 
gramme hintereinander 
zu setzen und mit 
RENUM die Numerierung 
zu ändern. Bei mir läuft 
trotzdem nichts und dar- 


über bin ich sehr verärgert. 


Ich besitze den Schneider 
6128. Starte ich zuerst 
das Ladeprogramm, bleibt 
das Programm mit der 
Meldung ‘“‘Checksum 
Error in Zeile 5“, wegen 
des Stop-Befehles stehen. 
Die gemeldete Zeilennum- 
mer kann ich nach Belie- 
ben beeinflussen. Mache 
ich es umgekehrt, zeigt 
mir das Programm alles 
mögliche, nur nichts vom 
Disketteninhalt. In Zeile 
450 meldet er grundsätz- 


lich Syntax Error, obschon 


ich die Zeile schon zum 
xten Mal überprüft habe. 
Sie ist identisch mit 
Ihrem Listing. 

Karlheinz Weiand, 
Dülmen-Buldern 


Es tut uns leid, daß Sie 
einige Schwierigkeiten mit 
dem Disketten-Monitor 
haben, der eigentlich aus- 
Bagenmet läuft. Viel- 
eicht war die Beschrei- 
bung tatsächlich etwas zu 
knapp. Wenn wir im Heft 
geschrieben haben, daß 
Sie das Programm mit 
RUN starten können, 
dann bezog sich dies dar- 
auf, daß es bereits einge- 
lesen und im Speicher ist. 


DIALOG 


Also entweder LOAD 
“DISCMONI“ (oder wie 
Sie das Programm ge- 
nannt haben) und an- 
schließend RUN eingeben, 
oder gleich mit RUN 
“DISCMONI“ starten. 
Voraussetzung ist aller- 
dings, daß Ladeprogramm 
und Hauptprogramm ge- 
trennt abgetippt und ab- 
gespeichert wurden. In 
der Regel — so auch beim 
Diskettenmonitor — lädt 
das Vorprogramm den 
Hauptteil nach, nachdem 
einige Parameter geändert 
wurden und es hat durch- 
aus seinen Sinn, daß die 
beiden Teile getrennt vor- 
liegen. Also bitte nicht in 
ein Listing umwandeln 
und mit einem RENUM- 
Befehl verändern. 


PROGRAMM LÖSCHEN 


Ich besitze seit einiger 
Zeit einen Schneider CPC 
664. Da ich nicht immer 
die Zeit habe, ein Pro- 
grammlisting mit einem 
Mal fertig abzuschreiben, 
kommt es häufig vor, daß 
ich ein Listing zwei- oder 
dreimal abspeichern muß. 
Das kostet Speicherplatz 
und Disketten. Können 
Sie mir schreiben, wie 

ich unvollständige 
Listings auf der Diskette 
löschen kann und wie 

ich gelöschte Disketten 
wieder gebrauchen kann? 
Eine weitere Bitte habe 
ich noch: Es kommt 
manchmal vor, daß ich 
ein Programm nicht mehr 
mit ESC-Shift-Ctrl 1ö- 
schen kann. Ich muß 
dann jedesmal den Com- 
puter ganz ausschalten. 
Wie kann man da Abhilfe 
schaffen? Laufen Turbo- 
Pascal-Programme auch 
auf dem Schneider 664? 
Ich erhalte stets eine 
Syntax-Error-Meldung. 
Gertrud Rolfes, 

Steinfeld 


Wenn Sie Programme im- 
mer unter dem gleichen 
Namen abspeichern, 
dann wird das vorange- 
gangene File zu einem 
ackup-Programm, er- 
kenntlich an der BAK-Er- 
weiterung hinter dem 


Punkt. Speichern Sie 
nochmals mit gleichem 
Namen ab, so wird das 
erste gelöscht, das zweite 
zum Back-up. Auf diese 
Weise haben Sie immer 
nur zwei Programme mit 
gleichen Namen auf der 
Diskette. Wenn Sie trotz- 
dem noch ein Programm 
löschen wollen, dann ge- 
ben Sie unter Basic fol- 
genden Befehl ein: 
a$=‘PROGRAMM.BSP“ 
:IERA, $a$ 


oder 
IERA, ‘PROGRAMM. 
BSP“ 


Die so gelöschten Disket- 
ten können Sie ganz nor- 
mal weiterbenutzen. 
Einige Programme blok- 
kieren die ESC-Taste, 

so daß ein ‚‚Drei-Finger- 
Reset“ nicht mehr mög- 
lich ist. In diesem Fall 
muß tatsächlich der Com- 
puter ausgeschaltet wer- 
den, um den Speicher 
wieder frei zu bekommen. 
Turbo Pascal läuft auch 
auf dem CPC 664. Aller- 
dings benötigen Sie hier- 
für den Interpreter, den 
es (zusammen mit dem 
Compiler) von Borland 
gibt. 


EINSTEIGERTEIL 
ERWÜNSCHT 


Ich habe ein sehr großes 


Problem. Da ich ein to- 
taler Einsteiger in Sachen 
Computer bin und den 
Großteil im Schneider 
Handbuch viel zu schwie- 
rig erklärt finde, suche 
ich nun Bücher oder sogar 
Programme (Selbstlern- 
Basic), durch die ich ei- 
nen guten Einstieg in die 
Fachwelt bekomme. 
Ebenso machen mir die 
speziellen Ausdrücke in 
diversen Fachzeitschriften 
zu „schaffen“. Man 
braucht halt immer gewis- 
se Grundlagen, aber die 
bekomme ich nicht durch 
das Schneider Handbuch. 
Vielleicht könntet Ihr ja 
auch in Eurer Zeitschrift 
einen kleinen Teil für 
Einsteiger einrichten, der 
sicherlich nicht nur mir 
Nutzen bringen würde 
und der natürlich nicht 
mehr als 2 — 3 Seiten um- 
fassen sollte. Der Einstei- 


17 


ER SB, 
ad, 
nich 


gerteil sollte natürlich 
nicht nur für den CPC 464 
gedacht sein, sondern The- 
men behandeln und Be- 
fehle erklären, die bei 
allen Computern etwa 
gleich sind. Falls es pas- 
sende Bücher oder Pro- 
gramme gibt, könntet Ihr 
dann bitte die Titel ver- 
öffentlichen? Auch wenn 
ich ein Anfänger bin, so 
bitte ich Euch doch, mal 
über meinen Brief nach- 
zudenken. 

Markus 


Vielen Dank für das Lob 
und gleich eine Bitte an 
alle, die uns schreiben. 
Nennt Euren Absender 
auch auf den Brief und 
nicht nur auf dem Um- 
schlag. Sonst kann es, 
wie im Beispiel Markus, 
passieren, daß wir den 
Umschlag vergeblich su- 
chen, wenn wir Euch ant- 
worten wollen, Schneider 
aktiv will natürlich auch 
den Einsteigern eine Hilfe 
sein und die Idee haben 
wir deshalb gleich aufge- 
griffen. Bisher haben wir 
ja schon versucht, auf 
leicht verständliche Art 
einige Computerthemen 
zu behandeln. Auch die 
Programmierung kam da- 
bei nicht zu kurz, etwa 
bei der Programmverwal- 
tung. Trotzdem werden 
wir uns noch einmal Ge- 
danken machen, wie wir 
in dieser Richtung mehr 
bringen können, Als 
Selbstlernkurs-Kassette 
ist uns nur der Basic-Kurs 
von Schneider bekannt. 
Bei Büchern ist die Aus- 
wahl natürlich riesengroß 
und es ist nicht leicht, 
ein paar davon herauszu- 
greifen. In unserer Be- 
sprechungsrubrik findet 
sich jedoch auch immer 
wieder Literatur für Ein- 
steiger. 


LOTUS AUF DEM 
CPC 6128 


Ich bin stolzer Besitzer 
eines CPC 6128. Ich besit- 
ze aber auch das Pro- 
gramm Lotus 123 für den 
IBM-PC. Nun habe ich 
folgende Frage an Sie: 
Kann ich, wenn ich mir 
eine 5.25-Zoll-Floppy 


und eine MS/DOS-Karte 
kaufe, dieses Programm 
voll nutzen? Muß ich ei- 
ne bestimmte Floppy 
oder eine bestimmte MS/ 
DOS-Karte haben? Ich 
wäre sehr erfreut, wenn 
Sie mir weiterhelfen wür- 
den. Ich bin erst vor kur- 
zem von einem CPC 464 
auf einen CPC 6128 um- 
gestiegen. Ich habe natür- 
lich auch einige Spiele auf 
Kassette, die ich nun auf 
meinem CPC 6128 ohne 
lange Ladezeit spielen 
möchte. Könnten Sie mir 
bitte sagen, wie ich diese 
Spiele auf Diskette be- 
komme und sie dann an- 
schließend spielen kann? 
Lorenz Schulz, 

Bovenau 


Ein System der Steckkar- 
ten, ähnlich wie beim PC, 
sin: es für die CPC-Serie 
eider nicht. Für den Ein- 
satz eines IBM-PC-Pro- 
grammes benötigen Sie 
einen MS-DOS-Emulator. 
Diesen gibt es jeweils mit 
einer oder zwei Floppy- 
stationen. Es handelt sich 
dabei um einen vollwerti- 
gen PC mit 8088 Prozes- 
sor und eigenem Speicher 
(mindestens 256 KByte). 
Lediglich die Tastatur 
und der Bildschirm des 
CPC werden weiterhin 
genutzt. Entsprechend 
teuer sind DOS-Emulato- 
ren, so daß die Überle- 
gung bleibt, ob Sie wegen 
eines Programmes diese 
Ausgaben auf sich neh- 
men wollen. Anbieter sind 
die Firmen Vortex und 
Kersten & Strauch. 
Leider läßt sich Software 
nur dann auf Diskette 
überziehen, wenn der Ko- 
pierschutz geknackt wur- 
de. Dieser kann von Pro- 
gramm zu Programm ver- 
schieden sein und erfor- 
dert zur Überwindung ei- 
nige Sachkenntnis. Selbst 
in Ihrem Fall kommen 
noch rechtliche Bedenken 
hinzu. Für Schneider aktiv 
war dies schon mehrfach 
ein Argument, gegen die- 
sen „Eigentumsschutz“ 
zu argumentieren. Es tut 
uns leid, daß wir Ihnen 
darüber hinaus nicht wei- 
terhelfen können. Erfah- 
rungsgemäß zeigen sich 


auch Softwarefirmen stur, 
wenn es darum geht, 
Kassettenspiele in Disket- 
tenversionen umzutau- 
schen (Vgl.: „Sind wir 
alle Ganoven‘‘, Heft 5/87). 


PROBLEME MIT 
FEHLERMELDUNGEN-— 
WER KANN HELFEN? 


Ich arbeite seit einiger 
Zeit mit Turbo Pascal 
(Version 3.0) auf dem 
CPC 664 und mache von 
Zeit zu Zeit die unange- 
nehme Erfahrung, daß 

der Rechner beim Wech- 
sel von Disketten die Feh- 
lermedlung “BDOS on 
ERROR A: R/O“ ausgibt. 
Es ist mir daher schon 
häufiger passiert, daß ich 
ein relativ langes Pascal- 
Listing abgetippt habe 
und dieses nach einem 
vorherigen Diskettenwech- 
sel mit der Sicherungsfunk- 
tion ““Save“ abspeichern 
wollte. Daraufhin erschien 
dann folgende Meldung: 
“Saving “Programmname“; 
“BDOS on ERROR A: 
R/O?‘“. Ein erneuter 
CP/M Start mit “Ctrl‘“ und 
“C“ führt dazu, daß sich 
der Rechner wieder mit 
A/(Prompt) meldet. 

Ein erneutes Absichern 
durch das Programm mit 
“Save“ ist nicht möglich. 
Durch die Fehlermeldung 
geht der eingegebene 
Quelltext im Rechner ver- 
loren. Ein zwischenzeit- 
licher Diskettenwechsel 
kann u.U. schon einmal 
erforderlich werden, wenn 
das Programm mehr Spei- 
cherplatz benötigt als ur- 
sprünglich erwartet. Mein 
Anliegen richtet sich daher 
an die Leser Ihrer Zeit- 
schrift, ob jemand viel- 
leicht weiß, wie die 
BDOS-Fehlermeldung 
'hardware- oder software- 
mäßig unterdrückt werden 
kann. So nützlich Fehler- 
meldungen ansonsten sein 
können, so nervend wir- 
ken sie, wenn diese Mel- 
dungen an solchen Stel- 
len auftauchen, wo man 
sie absolut nicht gebrau- 
chen kann. 

Heinrich Wischerath, 
Rosenweiherweg 5, 

5303 Bornheim 4 
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DEUTSCHE 
ANLEITUNGEN — 
NICHT IMMER 
SELBSTVERSTÄND- 
LICH 


Durch einen Verlag habe 
ich mir das von Ihnen 
getestete Spiel ‚‚Infiltra- 
tor“ bestellt. Leider ent- 
hält dieses Spiel nur eine 
englisch abgefaßte An- 
leitung. Da Sie das Pro- 
gramm getestet und die 
Beschreibung für gut be- 
funden haben, müßten 
Sie eigentlich eine Über- 
setzung davon haben. 
Könnten Sie mir nicht 
eine solche Übersetzung 
zusenden? 

Rainer Huchtmann, 
Vesmold 


Leider können wir dies 
nicht tun, denn auch auf 
den Programmbeschrei- 
bungen liegt ein Urheber- 
recht. Wenn wir ein Pro- 
gramm testen, zu dem 
nur eine englische Anlei- 
tung exisitert, dann wei- 
sen wir ausdrücklich dar- 
auf hin, Beim ‚‚Infiltra- 
tor‘ gibt es jedoch eine 
deutsche Beilage, die we- 
gen der humorvollen Spiel- 
eschreibung von uns sehr 
gelobt wurde. Wahrschein- 
lich kam Ihre Software- 
lieferung aus einem ‚‚Grau- 
import“, vor dem Soft- 
wareverlage häufiger war- 
nen. Der Ärger ist voll- 
kommen, wenn die Preis- 
vorteile nicht an den 
Kunden weitergegeben 
werden und Sie die Origi- 
nalversion ebenso viel 
kostet wie die deutsche 
Übersetzung. Wenn 
Schneider aktiv also aus- 
drücklich von einer über- 
setzten Version schreibt, 
dann bestehen Sie bei 
Ihrem Händler darauf. 


HARDCOPY ALS 
RSX-BEFEHL 


Als erstes möchte ich 
mich ganz herzlich für die 
prompte Beantwortung 
meiner Frage bei Ihnen 
bedanken. Leider habe 
ich dennoch Schwierig- 
keiten. Bei dem ‚‚Dia- 
gram“ erscheint nach 
dem Drücken der H-Taste 
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der Text “Unknown 
command in 940“, In- 
wieweit muß diese Zeile 
(Analog zu 1380 u. 
1720) verändert werden, 
wie hat der Aufruf der 
Hardcopy auszusehen? 
Klaus Schumann, 

Goslar 


Die Zeilen 940, 1380 
und 1720 rufen mit dem 
Befehl ICOPY eine Hard- 
u auf, die als 
RSX-Befehl zuvor einge- 
bunden werden muß. 
Die meisten unserer Au- 
toren besitzen eine sol- 
che Routine, können sie 
aber aus Urheberrechts- 
Gründen nicht weiterge- 
ben. Und warum sollte 
man das Rad zum zwei- 
ten Mal erfinden? Deswe- 
gen sollte der Leser sei- 
ne — mit Sicherheit 
bereits vorhandene — 
Routine benutzen. Aber 
auch wenn Sie noch 
kein solches Utility haben, 
kann Ihnen geholfen wer- 
den. In der Spezialausga- 
be 2/87 von Schneider 
aktiv wurde die „Super- 
hardcopy “ veröffentlicht. 
Speziell hierzu noch ein- 
mal das Vorgehen, Die 
„Superhardcopy ‘‘ ab 
Zeile 30000 abtippen, ab- 
speichern und starten. 
anach kann das Pro- 
gramm „Diagramm “ ge- 
startet werden, aber bit- 
te, ohne vorher einen 
RESET durchzuführen! 
Der Befehlsaufruf in den 
Zeilen 940, 1380 und 
1720 muß nunmehr aller- 
dings IHARDCOPY hei- 
ßen. Bitte vergessen Sie 
auch nicht, daß die Su- 
perhardcopy mittlerweile 
verbessert wurde. In den 
Zeilen 34160 müssen die 
beiden letzten Zahlen 
(200, 19342) durch 195, 
19337 ersetzt werden. 
In der Zeile 35170 muß 
es statt 177 (erste Zahl) 
und 10974 (letzte Zahl) 
nunmehr 183 und 10980 
heißen. 


Betr.: DER PC 1512 
IST TOT 


Alles fing mit dem CPC 
464 an, der zu einem sehr 
günstigen Preis angebo- 


ten wurde. Er war in der 
Tat der Computer, der 
dem C 64 ernsthaft Paro- 
li bieten konnte. Um 

den Vorteil der Diskette 
zu nutzen, kam schon 
bald ein Diskettenlauf- 
werk heraus. Die Compu- 
tergemeinde freute sich. 
Dann aber ging es Schlag 
auf Schlag. Der CPC 

664 wurde herausge- 
bracht und kurz darauf 
kam der 6128, der auch 
halbwegs professionell 
eingesetzt werden konnte. 
Schon damals fühlte 

sich Otto Normalverbrau- 
cher betrogen, kostete 
der moderne 6128 Color 
doch genausoviel wie 
der gute alte CPC. Aber 
dann kam es noch viel 
schlimmer. Der PCW 
8256 kam auf den 

Markt. Sofort griffen vie- 
le nach dieser tollen 
Schreibmaschine. Diese 
freuten sich aber nicht 
lange daran, kostete der 
PCW 8256 doch nach 
einigen Monaten 700,— 
DM weniger und der PCW 
8512 mit doppelt soviel 
Speicherplatz genau das 
gleiche wie ihr Gerät. 

Da konnte einem, der 
sich einen Schneider Com- 
puter zulegen wollte, 
schon angst und bange 
werden und viele entschie- 
den sich wegen des un- 
überschaubaren Preisver- 
falles für eine andere 
Marke. Erboste Käufer 
des PC 8256 bekamen 
trotz Anfrage bei Schnei- 
der niemals befriedigende 
Antworten. Schließlich 
und endlich wurde der 
Joyce-Gemeinde der 
Todesstoß versetzt, konn- 
te man mit dieser Maschi- 
ne eben doch nicht viel 
mehr als schreiben. Also 
versuchte sich Schneider, 
dem Standard anzupassen, 
was mit dem PC 1512 
auch recht gut gelang. 
Nach einigen Monaten 
kam der (erwartete) Preis- 
verfall von 500,— DM. 
Allerdings konnten die 
Besitzer des 1512 nur mit 
neidischen Augen auf die 
Amiga- und Atari-Besit- 
zer schauen. Ein neues 
Gerät mußte also her. 

Ich persönlich finde es 
aber nicht richtig von 
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Postiach 1161 
8044 Unterschleissheim 


Schneider, den Normal- 
bürger mit seiner Maschi- 
ne einfach so stehen zu 
lassen. Sicherlich ist es 
lobenswert, daß Schnei- 
der die Grafik verbessern 
will, aber die PC-1512- 
Gemeinde, die Schneider 
vertraut, sollte nicht im 
Stich gelassen werden. 
Meiner Meinung nach 
sollte man bei Schneider 
von Anfang an ein Gerät 
planen und alle Gesichts- 
punkte mit einbeziehen, 
auch wenn es etwas län- 
ger dauert, anstatt wahl- 
los ein Gerät nach dem 
anderen auf den Markt 
zu bringen. Die Endver- 
braucher werden Schnei- 
der dafür sicherlich dank- 
bar sein. 

Matthias Dühn, 
Meerbusch 1 


SCHWIERIGKEITEN MIT 
DER DATA MEDIA- 
ERWEITERUNG 


Immer wieder lese ich in 
Schneider aktiv, wie ande- 


re Schneider-User Hilfe 
von Ihnen bekommen. 
Heute möchte ich Sie nun 
auch einmal um Hilfe bit- 
ten. Vor einiger Zeit habe 
ich mir für meinen CPC 
464 eine Speichererweite- 
rung zugelegt, da ich auch 
„größere“ Programme auf 
dem Rechner laufen las- 
sen wollte. Ich erwarb 
deshalb eine 64 KByte- 
Erweiterung der Firma 
Data Media. In der Be- 
schreibung zu der Karte 
las ich, daß zum Einbin- 
den der Erweiterung un- 
ter CP/M zusätzlich noch 
eine Software-Kassette er- 
worben werden muß. 
Diese sei über die Firma 
Data Media zu beziehen. 
Leider gibt es diese Firma 
nicht mehr. Meine Frage 
lautet deshalb: Wissen 
Sie, wer den Vertrieb die- 
ser Systemsoftware über- 
nommen hat? Sollten Sie 
mir diese Frage nicht 
beantworten können, so 
bitte ich Sie, diesen Brief 
als offene Anfrage an Ihre 
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Leser zu veröffentlichen. 
Günther Behrendsen, 
Dorfstr. 12a, 

2086 Ellerau/Holstein 


Die Firma Data Media 
meldete bereits Mitte 
vergangenen Jahres Kon- 
kurs an. Uns ist niemand 
bekannt, der die Soft- 
und Hardware dieser 
Firma weitervertreibt. 
Aus diesem Grunde kön- 
nen wir Ihnen auch nicht 
helfen, reichen Ihre An- 
frage hiermit jedoch an 
alle Leser weiter. 


KORREKTUR ZUM 
LATEIN- 
VOKABELTRAINER 


Nach Eingabe des Listings 
Latein-Vokabeltrainer 
aus dem Spezialheft 2/87 
erscheint beim Start des 
Programmes die Meldung 
“Memory Full in 70°. 
Trotz mehrmaliger Über- 
prüfung konnte ich kei- 
nen Fehler entdecken. 
Ich möchte Sie bitten, 
noch einmal das Listing 
zu kontrollieren. 

Jost Wischerath, 


öln 


Sie haben recht. Peinlich, 
peinlich: Die Zeile 70 
wurde nur verstümmelt 
ausgedruckt. Das HIMEM 
darf nicht mit 38 bezif- 
fert werden, sondern muß 
korrekt 38999 lauten, wie 
dies schon aus dem Lade- 
programm ersichtlich ist. 
Wir haben bis heute noch 
keine Erklärung für die- 
sen Fehler und möchten 
uns nachträglich ent- 
schuldigen. 


SERVICE 


AM CPC-ALLE 
FORMATE 


PASSEN 


Als wir im Heft 5/87 das Hitachi 3-Zoll-Laufwerk 
im Selbstbau vorstellten, war die Leserreaktion beein- 
druckend und nachhaltig zugleich. Viele Anfragen 
richteten sich auch auf ein Zweitlaufwerk im 5 1/4- 
Zoll-Format, so daß wir uns kurzfristig entschlossen, 
ein derartiges Projekt in Angriff zu nehmen. Unser 
Ziel war es dabei, den Markt eingehend zu durchleuch- 
ten und schließlich einen qualitativ hochwertigen 
Bausatz zu einem Komplettpreis von ca. 300,— DM 
zusammenzustellen. Bei den derzeitigen Laufwerks- 
preisen kein leichtes Unterfangen, wie sich sehr schnell 
herausstellte. Um es vorwegzunehmen: Nach vielen 
Mühen, endlosen Telefonaten und unzähligen 
Musterproben konnten wir tatsächlich den gewünsch- 
ten Erfolg verbuchen. Die Summe unserer Erfahrungen 
spiegelt der folgende Bericht wieder. 


Eigentlich, so war die erste 
Überlegung, kann es nicht 
im Sinne des Anwenders 
sein, mit unterschiedlichen 
Diskettenformaten zu ar- 
beiten, wenn nicht gewich- 


tige Gründe dafür sprechen. 


Nun, solche Gründe gibt 
es tatsächlich zur Genü- 
ge. Das riesige Angebot an 
5.25-Zoll-Public-Domain- 
Disketten für das CP/M- 
Betriebssystem liefert die 
ersten Argumentations- 
hilfen. Der niedrige 
Diskettenpreis im Ver- 
gleich zum 3-Zoll-Format 
spricht ebenfalls für das 

5 1/4-Zoll-Format. Wer 
außerdem noch mit dem 
Gedanken spielt, sich spä- 
ter einmal zusätzlich einen 
PC anzuschaffen, der hat 
die Entscheidung fast 
schon getroffen. Mit ei- 
nem 5 1/4-Zoll-Zweitlauf- 
werk des CPC läßt sich 
die Grundversion des 
Schneider PC problemlos 
selbst aufrüsten. Die erfor- 
derlichen Einbauschienen 
für den PC sind mittler- 
weile erhältlich. In einem 
der nächsten Hefte wer- 
den wir ausführlich auf 
diese Möglichkeit ein- 
gehen. 


Bei der Auswahl des 

5 1/4-Zoll-Rohlaufwerks 
haben wir uns auf solche 
beschränkt, die Shugart 
Bus kompatibel sind, 
eine Steprate von minde- 
stens 12 ms haben und 
den Pin 34 des Floppy- 
buses mit einer *Ready“- 
Meldung beschaltet ha- 
ben oder entsprechend 
modifiziert sind. Viele 
Fernostnachbauten ver- 
zichten auf die Belegung 
des 34er Pins (im PC 


DIE QUAL DER WAHL 


nicht notwendig). Sie sind 
ohne Hardwareänderun- 
en am CPC nicht lauf- 
ähig. Zwar läßt sich der 
besagte Stift auf Masse 
(= ‘“Ready“‘) legen, das 
geht aber nur so lange 
gut, wie nicht unter 
CP/M 3.0 (CPC 6128) ge- 
arbeitet wird. Dort steigt 
das Betriebssystem z.B. 
nach einem Kopiervor- 
gang aus. Was das Auf- 
zeichnungsformat des 
Laufwerks anlangt, so ha- 
ben wir uns auf ein dop- 
pelseitiges Laufwerk im 
normalen IBM-Format 


(2x40 Spuren, 360 k for- 
matierter Speicherplatz) 
festgelegt. Einseitige 
Laufwerke (wie das im 
CPC) sind kaum noch zu 
bekommen und dem 
Schneider-Controller ist 
es letztlich egal, ob ein 
oder zwei Köpfe vorhan- 
den sind. Laufwerke mit 
2x80 Spuren (ca. 720 kb 
formatiert) lassen sich 
ebenfalls betreiben. Ge- 


nutzt werden allerdings 
auch nur 40 Spuren, 
wenn man nicht software- 
seits (Disk Para) nach- 
hilft. Der Controller 
kann es halt nicht besser. 
Trotzdem kann man die 

5 1/4-Zoll-Disketten auch 
beidseitig nutzen, indem 
man entweder — wie ge- 
wohnt — mit einer Wende- 
diskette (2 Schreibschutz- 
und Indexlöcher) arbeitet 
oder durch einen Mikro- 
schalter über den Pin 32 
(side select) des Floppy- 
busses beide Schreib-, 
Leseköpfe des Laufwerks 
nutzbar macht. Pro Dis- 
kette stehen dann die vol- 
len 360 KB zur Ver- 
fügung. 

Wenden wir uns nun den 
Laufwerken selber zu. 
Geprüft haben wir neben 
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zwei Geräten der Markt- 
führer (Teac FD 55 und 
NEC 1053) das Chinon 
FZ 502 und das FD-104 
von Cetera. 


TEST VON TEAC FD 
55 FV UND NEC 1053 


Das Teac und das NEC- 
Laufwerk sind beide mit 
einem elektromagneti- 
schen Headload-Mechanis- 


Foto oben: Die Laufwerks- 
parade von links nach rechts: 
NEC, Chinon, und ein Drei- 
zeolllaufwerk zum Grössen- 
vergleich. 

Foto rechts: Drei der sechs 
geprüften Netzteilplatinen 


mus ausgerüstet. Welchen 
Nutzen der Anwender da- 
von hat, versteht man am 
besten, wenn man sich 
vor Augen führt, was im 
Laufwerksinneren pas- 
siert. Normalerweise wird 
der Schreib-Lesekopf 
eines Laufwerks auf den 
Datenträger abgesenkt, 
sobald eine Diskette ein- 


gelegt wird. Dieser Vor- 
gang wiederholt sich in 
umgekehrter Reihenfolge 
erst beim Herausnehmen 
der Diskette. Nach lan- 
gem Aufliegen (z.B. beim 
Verbleib der Diskette 
nach dem Ausschalten) 
kann die Diskette „ein- 
gedrückt‘ und somit be- 
schädigt werden. Durch 
die Rotation der Diskette 
beim „Motor on“-Signal 


sind Abnutzungen der 
Magnetschicht außerdem 
vorprogrammiert, da stän- 
diger mechanischer Kon- 
takt zum Kopf besteht. 
Die Headloadfunktion 
vermeidet beide genann- 
ten Übel. Der Kopf wird 
nur zum Schreiben 

oder Lesen auf die Dis- 
kette abgesenkt, danach 
sofort wieder angehoben. 
Das Ganze funktioniert 
selbst dann noch, wenn 
die Betriebsspannung ab- 
geschaltet wird. Völlig 
problemlos ist dieser Head- 
loadmechanismus aller- 
dings nur dann, wenn der 
steuernde Computer die- 
se Funktion (z.B. Ein- 
schwingzeit) auch be- 
rücksichtigt, andernfalls 
(wie beim CPC) sollte man 
den Headloadmechanismus 


SERVICE 


via Jumperstellung aus- 
schalten. 


SOLIDE BAUART OHNE 
SOLLBRUCHSTELLEN 


Das Teac-Laufwerk ist üb- 
rigens von Haus aus ein 
2x80-Spur-Laufwerk, 
kann aber mittels nach- 
träglich einzubauendem 
Schalter über den 
Widerstand R 19 auch 
auf 2x40 Spuren umge- 
schaltet werden. Das NEC 
Laufwerk zeichnet die üb- 
lichen 2x40 Spuren. 
Mechanisch gehören bei- 
de Typen zu den derzeit 
besten auf dem 5 1/4- 
Zoll-Markt. Nicht zuletzt 
TEAC hat mit seinen 

5 1/4-Zoll-Floppies in den 
letzten Jahren Standards 


gesetzt, die nicht von un- 
gefähr kommen, das 
merkt man — wie auch 
beim NEC -— an jeder 
Stelle im Gerät. So ist 
z.B. die Sicherungsmecha- 
nik bei beiden Laufwer- 
ken nur mit Metallteilen 
bestückt. Aufbau und 
Konstruktion lassen selbst 
bei Dauerbetrieb hier kei- 
ne Sollbruchstellen er- 
kennen. Solidität doku- 
mentiert auch das Ge- 
wicht von 1,25 kg, das 
jedes Laufwerk auf die 
Waage bringt. Bei den 
Datenprüfungen verhiel- 
ten sich beide Testkandi- 
daten erwartungsgemäß. 
Sie verarbeiteten auch 
Problemdisketten ohne 
Beanstandungen. Eine 
Haltestrom-Steuerung po- 
sitioniert den Stepmotor 


in seiner augenblicklichen 
Position. Unachtsame 
Stöße oder Erschütterun- 
gen verschieben daher 
nicht den Kopf auf der 
Diskette, und Lesefehler 
beim erneuten Datenzu- 
griff sind damit ausge- 
schlossen. Für Datensi- 
cherheit ist somit rund- 
herum gesorgt. Was die 
Laufruhe der Floppies an- 
betrifft, so liegt das NEC- 
Laufwerk vorn, obwohl 
die Unterschiede sicher 
nicht gravierend sind. Le- 
diglich der Headloadme- 
chanismus macht sich 

als eine Art ‚‚Relais- 
klicken“ bemerkbar. 
Soviel Gutes hat allerdings 
auch seinen Preis. Ca. 
290,— DM muß man für 
einen der beiden Kandida- 


ten schon aufbringen. Vor 
allem PC-Aufrüster soll- 
ten trotzdem eines der bei- 
den Laufwerke — schon 
aufgrund der soliden Lei- 
stungsdaten — in die en- 
gere Wahl ziehen. Für den 
Betrieb am CPC nimmt 
man am Teac-Laufwerk 
folgende Jumperstellungen 


vor: DS1, U2,RY, EO, FG. 


DIE LAUFWERKE 
CHINON FZ-502 UND 
CETERA FD-104 


Für den preisbewußten 
CPC-Anwender (oder PC- 
Aufrüster) sind die beiden 
folgenden Laufwerkstypen 
von Interesse, die wir 
auch für unseren Bausatz 
vorgesehen haben. Das 
Chinon FZ-502 gefällt auf 
Anhieb durch seine kurze 
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Baulänge von ‚‚nur“ 

193 mm und die Blechab- 
deckung der Gehäuseober- 
seite. Es gehört zu den 
„Low Power Drives“, bei 
denen man aus Gründen 
der Leistungsaufnahme 
auf den elektromagneti- 
schen Headloadmechanis- 
mus und die Haltestrom- 
steuerung für den Step- 
motor verzichtet hat. Der 
Stromverbrauch liegt so- 
mit bei nur 4,4 Watt im 
Durchschnitt, so daß das 
Betreibernetzteil entspre- 
chend klein gehalten wer- 
den kann. Das Motor-On- 
Signal wird übrigens erst 
beschaltet, wenn eine 
Diskette eingelegt wurde, 
und der Stepmotor geht 
nach einem kurzen Zeit- 
impuls automatisch in 
einen Stromsparmodus. 
Die Laufwerksgeräusche 
des Chinon-Floppy sind 
durchaus angenehm, 
wenn auch unterschied- 
lich in der Intensität. 

Das hängt von der gerade 
bearbeiteten Spur ab. Das 
Einschieben der Diskette 


DAS SOLIDE 


. geht wunderbar leicht mit 


einem gut fühlbaren 
Druckpunkt am Schluß. 
Etwas mehr Kraftauf- 
wand erfordert der 
„Sicherungshebel“, was 
sicher wünschenswert ist. 
Wenn eseinen „Lada“ 
unter den IBM-kompa- 
tiblen Laufwerken gibt, 
so hat das Cetera FD-104 
diesen Namen sicher ver- 
dient. Solide, aber haus- 
backen könnte man auch 
sagen. Böse Zungen wür- 
den es vielleicht als 

„Olle Kamelle ‘ bezeich- 
nen, da es in der Optik 
etwas an die bereits be- 
tagten BASF-Laufwerke 
erinnert. Trotzdem kann 
dieses Laufwerk einige ge- 
wichtige Pluspunkte für 
sich verbuchen. Vor allem 
der eingebaute Stepmotor 
von JVC ist in der 
„Nicht-Geräusch-Ent- 
wicklung“ fast konkur- 
renzlos. Wäre nicht die 
zweite(!) grüne Leucht- 
diode, die einen Schreib- 
oder Lesevorgang meldet, 
man müßte öfters speku- 
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lieren, ob das Laufwerk 
gerade auf die Daten zu- 
greift oder nicht. Leider 
hat dieses Laufwerk den 
Pin 34 des Busses nicht 
beschaltet, so daß es vom 
Anbieter entsprechend 
modifiziert werden muß. 
Das ist aber auch schon 
alles, was ihm angekreidet 
werden muß. Ansonsten 
wird auch hier solide Qua- 
lität geboten Die Kopf- 
positionierung und der 
Motorstart erfolgen erst 
nach dem „Drive-select- 
Signal“, und das Lauf- 
werk verfügt über eine 
„Standby “-Stromspar- 
schaltung. In puncto Da- 
tensicherheit verhielten 
sich beide Laufwerke etwa 
gleich gut, so daß auch 
im Hinblick auf die Kopf- 
justierungen keine Ab- 
striche gemacht werden 
müssen. Mechanisch ge- 
sehen sind sie allerdings 
einfacher ausgestattet als 
die Konkurrenz von Teac 
oder NEC. Bei normaler 
Beanspruchung dürfte das 
allerdings kaum eine Rol- 
le spielen, zumal ein 

Preis um die 200,— DM 
ein gewichtiges Argu- 
ment darstellt. 


DIE NETZTEILFRAGE 


Bis auf wenige Ausnah- 
men brauchen alle Flop- 
pylaufwerke eine Ver- 
sorgungsspannung von 

5 V und 12 V Gleich- 
spannung, bei einer 
Stromentnahme je nach 
Laufwerkstyp bis zu 

1,5 A(mpere). Die typi- 
sche Leistungsaufnahme 
liegt bei etwa 0,5 A. Für 
unser Bausatzvorhaben 
kamen nur Netzteile in _ 
Frage, die komplett (also 
einschließlich Trafo) auf 
einer Platine montiert 
sind, da Laufwerk und 
Stromversorgung in ei- 
nem gemeinsamen Gehäu- 
se untergebracht werden 
sollen. Das Schaltungs- 
prinzip der Netzteile war 
bei den von uns geprüften 
Mustern durchaus ähnlich. 
Zunächst wird die aus 
der Steckdose entnomme- 
ne Wechselspannung (pri- 
mär) auf das benötigte 
Maß (sekundär ca. 7 V 
und 14 V) reduziert. Die- 


se Arbeit verrichtet ein 
Netztransformator (Tra- 
fo). Eine Diode (Brücken 
gleichrichter o.ä.) sorgt 
dann für eine Gleichrich- 
tung der reduzierten Wech- 
selspannungen, die an- 
schließend geglättet wer- 
den muß. Dafür sind ein so- 
genannter Ladekonden- 
sator und schließlich 

noch zwei kleinere Kon- 
densatoren zuständig. 

Die Kapazität dieses Bau- 
teils (z.B. 2200 uF abhän- 
gig von der Stromentnah- 
me) ist u.a. für die auf- 
tretende Brummspan- 
nung verantwortlich. Die- 
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gabe, unabhängig von der 
Leistungsentnahme. 
Damit die beschriebene 
Schaltung nun zufrieden- 
stellend funktioniert, müs- 
sen alle Bauteile sorgsam 
ausgewählt und folgerich- 
tig geschaltet werden. Der 
Trafo muß z.B. eine um 

2 — 3 V höhere Sekundär- 
spannung erzeugen als 
tatsächlich gebraucht 
wird, um den genannten 
ICs Regelmöglichkeiten 
nach oben offenzuhalten. 
Größere Zugaben sind we- 
gen der höheren Wärme- 
belastung der ICs nicht 
anzuraten. Der benötigte 


Kühlkörper müßte über- 
dimensioniert werden. 
Verzichtet man auf eine 
höhere Abgabespannung 
des Trafos und verwen- 
det z.B. ein2 x 6 V Bau- 
teil (1x6 V und 2x6 V 

= 12V), so muß der 


LADEKONDENSATOR... 


Transformator reichlich 
Leistungsreserven bereit- 
stellen. Auch die übrigen 
Bauteile tragen zur Netz- 
teilqualität entscheidend 
bei. Wie schon erwähnt, 
ist die Kapazität des Lade- 


se Brummspannung ent- 
steht dadurch, daß bei ei- 
ner Leistungsabgabe die 
Spannung bei immer kür- 
zer werdender Ladezeit 
des Kondensators sinkt 
und die abgegebene 
Gleichspannung durch 
eine Wechselspannung 


SPANNUNG KONSTANT 
HALTEN 


überlagert wird. Dem mög- 
lichen Spannungsabfall 
wirkt man daher mit Span- 
nungskonstanthalter-ICs 
entgegen. Diese wirken 

als Ventil und produzie- 
ren praktisch eine gleich- 
bleibende Spannungsab- 


Foto oben: Der Bausatz-Lauf- 
werk, Netzteil und Gehäuse. 
Nicht im Bild: die Anschluß- 
kabel 
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kondensators von Bedeu- 
tung. Die Frage, ob jeder 
Spannungskreis (5 V und 
12 V) einen separaten 
Kondensator besitzt und 
auch über einen eigenen 
Gleichrichter geschaltet 
wird, kann für das stö- 


„UND UNTERSCHIEDE 


rungsfreie Arbeiten des 
Netzteils nicht unerheb- 
lich sein. Da solche Über- 
legungen bei den Her- 
stellern mitunter unter 
dem Gesichtspunkt der 
Bauteilkosten gesehen 
werden, kann es nieman- 
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den verwundern, daß im 
praktischen Betrieb 
durchaus gravierende Un- 
terschiede bei den von 
uns geprüften Stromver- 
sorgungen auftraten. 

Nur zwei der insgesamt 
sechs erprobten Netzteile 
gaben sich fast brumm- 
frei und ermöglichten so 
entspanntes Arbeiten. Das 
erste stammt von Hart- 
mann Elektronic in 
Kreuztal und ist für 48,— 
DM .u haben. Das zweite, 
das wir auch in unserem 
Bausatz verwenden, wird 
von GE-Soft in Bonn pro- 
duziert. Es ist übrigens 


der einzige Vertreter, 
der für jede Abgabespan- 
nung einen eigenen 
Trafo verwendet. 


DIE GEHÄUSEFRAGE 


Die Gehäusefrage war bei 
unserer Bausatzüberlegung 
theoretisch schnell ge- 
klärt. Ein stabiles Metall- 
gehäuse in Schneider PC- 
grau sollte es sein, mit 
Platz für Netzteil und 
Laufwerk. Ein solches Ge- 
häuse zu beschaffen, ge- 
staltete sich sehr schwie- 
rig. Entweder stimmten 
Preis und Farbe nicht 


Foto links: Das Teac FD 55 
FV. Foto oben: Das fertige 
5,25er-Laufwerk 


oder es haperte an der 
Qualität. Schließlich konn- 
ten dann doch zwei klei- 
nere Hersteller ausfindig 
gemacht werden, die das 
erwähnte Gehäuse produ- 
zierten. Von einem Ver- 
trieb an den Endverbrau- 
cher wollten jedoch bei- 
de nichts wissen. Nun, 
nach endlosen (Telefon) 
Gesprächen gibt es sie 

nun doch, die Bezugsquel- 
le, bei der man das Gehäu- 
se (und nicht nur das) 
erwerben kann. 


DER BAUSATZ 


So, jetzt ist er komplett, 
der Bausatz. Die Montage 
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ist fast ein Kinderspiel, da 
alle notwendigen Bohrun- 
gen bereits vorhanden sind. 
Die Montage ist in etwa 
20 Minuten erledigt. 
Zuerst wird das Netzkabel 
via Zugentlastung mit dem 
Gehäuse verbunden. Dann 
montiert man die Netzteil- 
platine auf der Boden- 
platte (vier Abstandshal- 
ter und vier Schrauben 

+ Muttern M3). Phase und 
Nulleiter werden mit dem 
Netzteil verbunden, die 
Masseleitung mit dem Ge- 
häuse (wichtig!). Anschlie- 
ßend fertigt man den Netz- 
stecker für das Floppylauf- 
werk. Diese Arbeit wurde 
eingehend im Heft 5/87 
besprochen, deshalb gehen 
wir nicht näher darauf ein. 
Ist man soweit gekommen, 
werden Stromverbindung 
und Datenkabel (siehe 
Heft 5/87) zum Laufwerk 
gelegt, die Floppy lose 

auf die Bodenplatte ge- 
setzt und der Gehäuse- 
deckel von hinten über 

das Ganze geschoben. 
Jetzt brauchen nur noch 
die Schraubverbindungen 
(sechs) zwischen Gehäuse 
und Laufwerk hergestellt 
und die Gummifüße ange 
klebt werden, dann ist 

das Laufwerk anschluß- 
fertig. Beachten sollte 
man vor dem Zusammen- 
bau allerdings noch, ob 
alle Jumper (Kurzschluß- 
brücken) am Laufwerk 
richtig gesetzt sind. Beim 
Chinon und Cetera Lauf- 
werk ist dies nur je einer, 
der von DSO auf DS1 
gebracht werden muß 


FAZIT 


Bei Fertigstellung dieses 
Berichtes lief „unser“ 
Bausatz ohne Beanstan- 
dungen bereits in der 

5. Dauerbetriebswoche. 
Alles in allem bei einem 
fast sensationell niedri- 
gen Gesamtaufwand von 
ca. 300,— DM sicher 
eine lohnenswerte An- 
schaffung. Der Bausatz 
beinhaltet: Laufwerk 

5 1/4-Zoll (Cetera oder 
Chinon), Netzteilplatine 
fertig aufgebaut, Metall- 
gehäuse und alle notwen- 
digen Kabelverbindungen 
und Kleinteile. 


& 
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ER VDU-CONTROLLER UND DER 


BILDSCHIRMSPEICHER DES 
SCHNEIDER PC 1512 


Zwar ist es mit dem zum Lieferumfang des Schneider- 
PCs gehörigen Basis2 nicht möglich, mittels Peek und 
Poke auf Bildschirmdarstellungen bzw. auf den VDU- 
Controller Einfluß zu nehmen, aber sowohl auf Ebene 
der Maschinensprache, mittels anderer Hochsprachen 
(z. B. Turbo-Pascal) oder auch mit einem anderen 
Basic ist dies sehr wohl möglich. Um aber sinnvolle 
Manipulationen vornehmen zu können, ist es erfor- 
derlich einige Punkte über den CRTC-Emulator des 


Schneider PCs zu wissen. 


Vielen, die schon mit PCs 
gearbeitet haben und die- 
se auch näher kennen, ist 
sicherlich bekannt, daß 
für PCs sehr oft der 
MC6845 CRTC zur Bild- 
schirmdarstellung einge- 
setzt wird. CRCT ist die 
Abkürzung der englischen 
Bezeichnung ,Cathode 
Ray Tube Controller“ 
und damit ist der elektro- 
nische Baustein gemeint, 
der für die Bildschirmdar- 
stellung verantwortlich 
ist. Ach so, für diejeni- 
gen, die es nicht wissen, 
VDU ist die Abkürzung 
von Video-Display-Unit, 
was soviel heißt wie An- 
zeigeneinheit (Bild- 
schirm), und ein Control- 
ler ist eben ein Steuer- 
baustein. 

Im Schneider PC1512 
ist der MC6845 aber 
nicht vorhanden, sondern 
wid nur emuliert (es wird 
also nur so getan als ob 
es ihn gäbe, d. h. die 
Funktionen werden aus- 
geführt). Diese Emulation 
geschieht aber nicht voll- 
ständig, sondern nur teil- 
weise. Das zeigt sich so- 
fort, wenn man versucht, 
verschiedene Register, die 
beim echten MC6845 
programmiert werden 
können, zu beeinflussen. 
Diese „Gemeinheit“ kann 
von Software-Häusern — 
die für den Schneider PC 
Programme schreiben — 


so ausgenutzt werden, 
daß Sie auf Computern 
mit dem echten MC6845 
zu einer völligen Zerstö- 
rung der Bildschirmdar- 
stellung führen, auf dem 
Schneider-PC aber keiner- 
lei Auswirkungen zeigen. 
Auch so kann man sich 
vor einem Teil der Raub- 
kopienbenutzer schützen! 


Ein paar Details mehr 


Für diejenigen, die es 
genauer wissen wollen: 
Die Register 0 bis 8 sind 
nicht beeinflußbar. Die 
Steuerung des CRTC- 
Emulators geschieht über 
zwei Input/Output- 
Adressen. Das Adressregi- 
ster ist bei &3DO und das 
Datenregister bei &3Dl. 
Da auch das Interlace- 
Register (Register Num- 
mer 8) nicht beeinflußt 
werden kann und außer- 
dem der PC1512 mit 60 
Hz Bildfrequenz arbeitet, 
sind deshalb alle Versu- 
che, die Bildschirmdar- 
stellung des PC1512 
(durch Einschaltung des 
Interlace) verbessern zu 
wollen, sinnlos. Soweit 
zur Emulation. 

Betrachten wir einmal die 
Bildschirmdarstellung in 
den beiden Alphamodi. 
Wenn Sie Ihren PC ein- 
schalten und ganz normal 
MS-DOS booten, dann 


meldet sich der PC im 
80-Zeichen-Mode. 
Dieser Mode muß aber 
nicht beibehalten wer- 
den, sondern es kann 


durchaus auch auf 40 
Zheicen pro Zeile umge- 
stellt werden. Wenn Sie 
sich dies einmal ansehen 
wollen, dann booten Sie 
einmal MS-DOS mit der 


Sehen Sie sich aber bitte 
die Zeichendarstellung im 
40-Zeichen-Mode etwas 
genauer an. Sie werden 
feststellen, daß die Zei- 
chen nun exakt doppelt 
so breit sind. Die Höhe 
hingegen hat sich nicht 
verändert. Dieses Wissen 
hilft Ihnen auch beim 
Verständnis des Bild- 


Starke Verzeichnungen 


Diskette 1 und geben 
dann, wenn der Prompt 
(A>) erscheint 

mode co40 (RETURN- 
Taste) 

ein. Daraufhin beginnt 
die Diskettenstation an- 
zulaufen und das externe 
Kommando MODE wird 
ausgeführt, Der Zusatz 


Der Bildschirmspeicher 
beim PC 1512 


co40 bewirkt, 
Color-Mode die 40-Zei- 
chen-Darstellung einge- 
stellt wird. Beachten Sie 
bitte dabei, daß Sie nicht 
c0 eingeben, sondern co 
(kommt von Color)! 
Wenn Sie dann wieder 
auf 80 Zeichen umstellen 
wollen, geben Sie ein: 
mode co80 (RETURN- 
Taste). 


daß im 
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schirm-Speicherbedarfes. 

Der Bildschirm-RAM- 
Bereich beim Schneider- 
PC beginnt bei &B8000 
und belegt mit seinen 16 
KB (im Alpha-Mode) den 
Speicher bis &BBFFF. 
Bei der Bildschirmdarstel- 
lung wird aber zwischen 
Alpha- und Grafik-Mode 
unterschieden. 

Die höchste Auflö- 
sung, die mit der einge- 
bauten „Bildschirmkar- 
te“ erreicht werden kann, 
sind 200 Pixelzeilen a 
640 Bildpunkte (Pixel). 
Das sind insgesamt 
128000 Bildpunkte 
(Pixel). Da ein Byte aus 8 
Bit besteht, wäre somit 
bei nur einer Darstel- 
lungsfarbe (Bit gesetzt = 
Vordergrund, Bit nicht 
gesetzt = Hintergrund) 


der komplette Bild- 
schirmspeicher in 16 
KByte unterzubringen. 
Der genaue Bedarf wäre: 
128000/(1024*8) = 
15,625 KByte. 

Ein kleiner Rest von 


RAM-Speicherstellen, der 
vielleicht sogar noch zu 
anderen Zwecken be- 
nutzt werden könnte, 
wäre vorhanden. Um aber 
die volle Farbpracht von 
16 Farben darstellen zu 
können, reichen diese 16 
KByte nicht mehr aus. 
Deshalb werden im Gra- 
fik-Mode insgesamt vier 
16 KByte Speicherberei- 
che „übereinanderge- 
legt“. Der Bildschirmspei- 
cher umfaßt dann 64 
KByte und nicht nur 16 
KByte! 

Durch diese Technik 
erlaubt es der PC von 
Schneider, maximal ins- 
gesamt 16 verschiedene 
Farben zugleich darzu- 
stellen. Für Monochrom- 
Monitor-Darstellungen 
bedeutet das, daß die 
Signale rot (R), grün (G), 
blau (B) und die Intensi- 
tät MN (= Helligkeit) zu- 
sammengemischt werden 
und deshalb dann — an- 
stelle von 16 Farben — 
16 Grauabstufungen zu 
sehen sind. Die Gewich- 
tng für die Abstufungen 
ist dabei folgenderma- 
Ben: 


Intensität 


=8 
Grün =4 
=2 


Ist die Farbe Schwarz auf 
dem Bilschirm zu sehen, 
dann ist weder die Inten- 
sität noch eine der Far- 
ben ausgewählt. Die Wer- 


tigkeit bezüglich der 
Grauskala ist deshalb 
null. Ist sowohl die 


Intensität, als auch alle 
Farben ausgewählt, dann 
erscheint auf dem Bild- 
schirm helles weiß. Die 
Wertigkeit entspricht der 
Graustufe 15. Eine kleine 
Aufstellung soll bezüglich 
der Grauskala und ihrer 
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Matrix undeutlich 


gesetzten Farben Aus- 
kunft geben (siehe Tabel- 
le 1) 


Zwei Alpha-Darstellun- 
gen beim beim PC 1512 


Die Schneider-PCs erlau- 
ben zwei Alpha-Darstel- 
lungen und zwar entwe- 
der 40 Zeichen a 25 
Zeilen oder 80 Zeichen a 
25 Zeilen. Diese beiden 
Modi werden auch mit 
„mittlerer“ und „hoher“ 
Auflösung bezeichnet. 
Der Speicherbedarf liegt 
dabei bei 2000 oder 4000 
Bytes. Wenn hochauflö- 
sender Alpha-Mode und 
Grafik-Mode mit 160 
ee * 100 Pixel 
Höhe) gemischt werden, 
dann werden die anfangs 
angeführten 16 KByte be- 
nutzt. Hierzu muß der 
CRTC aber extra pro- 
grammiert werden. 

In der maximalen Auf- 
lösung stehen also zwi- 
schen dem oberen und 
unteren Bildschirmrand 
200 Linien bzw. Pixelzei- 
len zur Verfügung. Wenn 
Sie sich einmal die Mühe 


machen (mit den Schnei- 
der-Bildschirmen ist diese 
Mühe leider äußerst ge- 
ring) können Sie sehr gut 
erkennen, daß die Zei- 
chenhöhe maximal acht 
Pixelzeilen beträgt. Aller- 
dings müssen Sie berück- 
sichtigen, daß Sie bei 
einem Zeichen mit Unter- 
länge zählen. Nehmen Sie 
zum Beispiel das Para- 
graphenzeichen. Die Brei- 
te läßt sich nicht so leicht 
bestimmen, aber glauben 
Sie es uns einfach, sie be- 
trägt ebenfalls acht Bild- 
punkte. Um die Zeichen 
voneinander zu trennen, 
sind die letzten acht Pixel 
immer die Hintergrund- 
farbe. Die Zeichendarstel- 
lung der insgesamt 256 
Zeichen ist im Charakter- 
Generator-ROM _festge- 
legt. Der Zeichengenera- 
tor (= Charakter-Genera- 
tor) ist in einem Acht- 
KBit-ROM (also 1 
KByte) untergebracht 
und deshalb kann dieser 
Baustein vier verschiede- 
ne Zeichensätze aufneh- 
men. Durch zwei Brücken 
(LK7 und LK8) kann 
einer dieser Zeichensätze 
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ausgewählt werden. Diese 
Brücken befinden sich 
(Platine von vorne be- 
trachtet) auf der rechten 
Seite direkt unterhalb des 
IC 127 (VDU-ROM 
40045). 

Jedes Zeichen belegt im 
Bildschirm-RAM zwei 
Bytes. Ein Byte davon ist 
das Charakter-Code-Byte 
und das andere ist das 
zugehörige Attribut-Byte. 
Das Charakter-Code-Byte 
sagt also aus, welches 
Zeichen dargestellt wer- 
den soll und das Attri- 
bute-Byte bestimmt in 
welcher Art. 


Die Bildschirmdarstellung 
und Ablage der Alpha- 
Zeichen im Bildschirm- 
RAM 


Durch das Attribut- 
Byte können maximal 
24 Farben festgelegt sein 
(16 Vordergrund- und 8 
Hintergrundfarben). Da- 
bei ist zu unterscheiden 
zwischen dem Blinkmode 
(16 Vordergrundfarben 
und 8 Hintergrund plus 
Blinken) und der Darstel- 
lung von 16 Farben für 
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Vorder- und Hintergrund. 


Die Vordergrundfarben Tabelle 1 
“a, der . Seihenfolge Zugehörigkeit der Graustufen in bezug auf die Farben und Intensität 
BGRI) werden durch Bit BRER g \ 


0 bis 4 und die Hinter- Wertigkeit der Intensität Grün Rot Blau Farb- 


df: falls i ; 
en ö Reihenfeige BGRI) Grauabstufung (8) (4) (2) (1) Ergebnis 


durch die Bit 5 bis 7 be- 
stimmt. BGRI ist die 
Kurzbezeichnung für 
Blau, Grün, Rot, Intensi- 
tät. 

Zuständig, ob ein Zei- 
chen blinkt oder heller 
dargestellt wird ist Bit 7 
im Attribut-Byte in Ver- 
bindung mit Bit 5 des 
MODE-Byte. Ob Intensi- 
tät oder Blinken ausge- 
wählt ist, wird also mit 
dem Mode-Control-Bit 


schwarz 
blau 
rot 
magenta 
grün 
cyan 
braun 
weiß 

au 
hellblau 
hellrot 
helles magenta 
hellgrün 
helles cyan 


0 
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3 
4 
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6 
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5 bestimmt. Dieses gelb 
MODE-Control-Register helles weiß 
ist an der I/O-Adresse 

&3D8 zu finden und ist i . } j 

ein reines Schreibregister. Wie sehr leicht zu erkennen ist, werden bei gesetzter 

Bei diesem werden nur Intensität die Farben heller. 


die ersten 5 Bit benutzt. 
Die einzelnen Bit haben 
die in Tabelle 2 aufge- 
führte Bedeutung. 

Nun verstehen Sie 


auch, weshalb im 40-Zei- Tabelle 2 : ; . r 
chen.Mode 2000 Bytes Die Programmiermöglichkeiten des Video-Control- 


2 . Register (Adresse &3D8). 
nr 0B a ee Die Bit 6 und 7 haben keinerlei Effekte oder 
y 8 Bedeutungen. 


den. Normal i . sg 
(Wenn lese ie Zeichen Im Grafik-Mode ist Bit 5 bedeutungslos. 
selbst gespeichert wür- ; ; 
den) wären ja nur die Bit gesetzt nicht gesetzt 
Hälfte der Speicherstellen 0 _ Alpha-Mode 80 Zeichen Alpha-Mode 40 Zeichen 
erforderlich. — 1 _ Grafik-Mode Alpha-Mode 
Im Mode einer niedri- 2 Palette 2 ausgewählt Paletten 0,1 ausgewählt 
gen Grafiauflösung ist die 3 __ Video-Display ein Video-Display aus 
Darstellung von 100 4 __ Grafik-Mode 2 Grafik-Mode 1 
160 Pixel (Bildpunkte) 5 Blinken ein höhere Intensität/Blinken aus 


möglich. In diesem Mode, 
der insgesamt 16000 
Bytes belegt und in Ver- 
bindung mit dem hoch- 
auflösenden Alpha-Mode 
arbeiten kann, gibt es 
aber — in Bezug auf die 


Im Grafik-Mode hat Bit 0 keinerlei Einfluß 


Farbenpracht — einige Tabelle 3 

Einschränkungen. Warum 

das so ist ist schnell ge- Farbpalette 0 Farbpalette 1 Farbpalette 2 
sagt: Für die maximalen Fe TE FETT EEE FEETR ETNERT 
Farbdarstellungen wer- Hintergrund Hintergrund Hintergrund 
den eben nicht 16 KByte Grün Cyan Cyan 

sondern 64 KByte be- Rot Magenta Rot 


nötigt. „Offiziell“ gibt es Weiß Weiß 
eigentich nur zwei 
Grafik-Modi und zwar 


entweder die mittlere 
Auflösung von 320 * 200, 
oder die hohe Auflösung 
von 640 * 200 Pxel. 
Im Grafik-Mode 1 kom- 
men dabei nicht die 64 
KByte sondern nur 16 
KByte _Bildschirmspei- 
cher zum Einsatz. 

Die mittlere Auflösung 
erlaubt dabei die Darstel- 
lung von 16 Farben pro 
Pixel, die hohe Auflösung 
von vier Farben pro Pi- 
xel. 

Während im Grafik- 
Mode 1 nur 16 KByte 
als Bildschirmspeicher be- 
nützt werden, erfordert 
der Grafik-Mode 2 die 
bereits erwähnten 64 
KByte. Eine einfache 
Umschaltung vom Grafik- 
Mode 1 auf die anderen 
ist deshalb nicht so ohne 
weiteres möglich. Die 
Umstellung auf die Be- 
triebsart, daß wieder alle 
vier Planes (so nennt man 
die KB-Blöcke für die 
Schirmdarstellungen) be- 
schreiben werden, kann 
deshalb (üblicherweise) 
nur durch einen System- 
Reset oder durch Aufruf 
des externen System-Re- 
set oder durch Aufruf des 
externen Mode-Befehls 
erfolgen (Wir wissen daß 
es auch anders geht, der 
Einfachheit halber aber 
haben wir das so geschrie- 
ben). Die Übersetzung 
von „plane” ist Ebene. 
Stellen Sie sich bitte jede 
Ebene als eine Art Folie 
vor, die übereinanderge- 
legt werden. Eine Folie 
für Rot, eine für Grün, 
eine für Blau und letzt- 
lich noch eine für die 
Helligkeit. 
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In Mode 1 besteht eine 
Pixelzeile aus 80 Bytes. 
Das heißt, in jedem Byte 
sind vier Pixel codiert. 
Die Bit 7 und 6 gelten 
für das erste, Bit 5 und 4 
für das zweite, Bit 3 und 
2 für das dritte und Bit 
1 und O für das vierte 
Pixel. Da jedes Pixel 
durch zwei Bit codiert ist 
kann es nur eine von vier 
Farben aus einer von drei 
möglichen Farbpaletten 
darstellen. Siehe Tabelle 


3. 

Im Grafik-Mode 2 
kommen dann die 64 
KByte _Bildschirmspei- 
cher zum Einsatz. Dabei 
sind jeweils 16 KByte — 
wie schon angeführt — 
eine sogenannte Farb- 
ebene. Eine jede Ebene 
ist dann speziell zustän- 
dig für Farben Rot, 
Grün, Blau oder für die 
Intensität. Denken Sie an 
den Folienvergleich, dann 
verstehen Sie in etwa die 
Technik, die benutzt 
wird. Durch diese Art der 
Handhabung können in 
diesem Mode 16 Farben 
pro Pixel gewählt wer- 
den. Jedem Pixel sind 4 
Bit zugeordnet. Je eines 
aus jeder Ebene. 

Die Pixelzuordnung ist 
folgendermaßen: Bit 7 ist 
Pixel O0, Bit 6 Pixel 5 
usw. bis zu Bit O0 = Pixel 
7. Und dann folgt das 
nächste Byte usw. Das 
Adress-mapping ist dann 
wieder wie beim Mode 1. 

Im nächsten Heft von 
Schneider aktiv erfahren 
Sie dann noch mehr über 
den Bildschirm, seinen 
Aufbau und der Möglich- 
keit von Beeinflussungen. 


Die Pixelzeilen in Graphics-Mode 1 verlaufen 


folgendermaßen: 


Gerade Pixelzeilen-Nummern 
PZeile0 &B8000 bis &B804F 
PZeile2 &B8050 bis &B809F 


PZeile 198 &BYEFO bis &BYF3F 
UngeradePixelzeilen-Nummern 

PZeile 1 &BA000 bis &Ba04F 

PZeile 199 &BBEFO bis &BBF3F 
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DIE 
EIGENHEITEN 
DES CPC- 
BILDSCHIRM- 
SPEICHERS 


Auf den vorhergehenden Seiten besprachen wir 
die Monitor-Hardware. Dies war natürlich ein wenig 
theoretisch und mehr als ein paar Grundsatzinforma- 
tionen konnten dabei nicht herauskommen. Im 
letzten Absatz war jedoch die Rede von einigen Eigen- 
heiten (wieder mal!) des Schneider-Bildschirm- 
speichers, um den es in diesem Teil geht. 


Wer den Prospekt gelesen 
hat, der kennt wohl noch 
folgende Zahlen: 16 K- 
Byte Bildschirmspeicher 
und drei Modi zu 20 
Zeichen/16 Farben, 40 
Zeichen/4 Farben und 
80 Zeichen/2 Farben. 
Daß dies stimmt, hat 
man wohl schon gemerkt 
und es würde nicht loh- 
nen, mißtrauisch nachzu- 
rechnen. Wenn man sich 
die reine Mathematik je- 
doch einmal anschaut, 
die hinter dieser Bild- 
schirmverwaltung steckt, 
dann ergeben sich einige 
nützliche Nebensäch- 
lichkeiten, die man in 
Programmen verwerten 
kann. Aus diesem Grun- 
de soll die „Gewußt wie“- 
Reihe heute einmal über 
die Grafikmöglichkeiten 
des CPC berichten. 
ADRESSEN ZUM 
ABSPEICHERN UND 
EINLESEN 


Die 16 KByte des Bild- 


schirmspeichers belegen 
die oberste der vier Spei- 
cherbänke des CPCs, er 
beginnt also bei 48 K- 
Byte. Dies ist allerdings 
nicht die richtige Art, eine 
Adresse anzusprechen, 
deswegen kurz zum 
Nachrechnen: 48 (KByte) 
* 1024 (Byte je KByte) 
ergeben die Startadresse 
von 49152 oder C000 in 


hexadezimaler Schreib- 
weise. Eine häufig ge- 
äußerte Frage, nämlich, 
wie man ein Bild abspei- 
chern kann, ist damit 
schon einmal zu lösen. 
Der Basicbefehl lautet: 
SAVE“ BILD.BIN ‘,B, 
Anfadr,Länge,(Startadr) 
Die Anfangsadresse liegt 
— wie schon erwähnt — 
bei 49152, die Länge 
der Datei entspricht 
16384 (16*1024) Byte. 
Eine Startadresse benö- 
tigen wir in diesem Fall 
nicht und so müssen wir 
nur 
SAVE“BILD.BIN“,B, 
49152,16384 

eingeben, um den gesam- 
ten Bildschirm abzuspei- 
chern. Es ist völlig un- 
wichtig, ob wir die 
Adressen in dezimaler 
oder hexadezimaler 
Schreibweise eingeben 
und dies gilt auch für das 
Einlesen. Benutzer eines 
Kassettenrecorders müs- 
sen nur den Save-Befehl 
durch LOAD ersetzen 
und die Betreiber einer 
Diskettenstation können 
sogar auf die Angaben der 
Adressparameter ver- 
zichten. 

Wer will, der probiert 
auch mal den Befehl 
RUN“BILD.BIN“ 

und wird dabei feststellen, 
daß die Geschichte zwar 
genauso funktioniert, 
aber der Bildschirm so- 


fort nach dem Einlesen 
gelöscht wird. Dies hängt 
natürlich damit zusam- 
men, daß wir hier gar 
kein richtiges Programm 
haben. Der CPC liest mit 
LOAD ja nur den Inhalt 
einer Speicherzelle und 
legt ihn an der richtigen 
Adresse ab. Es ist fast so, 
als könnten wir beim 
Bildschirmspeicher in 
dieses Regal hinein- 
schauen. 

Zwei Dinge sind bei die- 
sem kurzen Versuch auf- 
gefallen. Zum einen 

muß man beim Abspei- 
chern und beim Einlesen 
den jeweils gleichen Mo- 
dus benutzen und zum 
anderen hat wohl jeder 
schon einmal gemerkt, daß 
der Bildschirm in Streifen 
aufgebaut wird. Warum 
dies so ist, dies zu verste- 
hen, dazu darf man schon 
wieder zum Taschenrech- 
ner greifen. 


WOHER KOMMEN DIE 
STREIFEN BEIM 
EINLESEN? 


Bevor man sich daran 
macht, die Farbzuweisun- 
gen zu erläutern, muß 
man sich zuerst einmal 
fragen, wieso denn der 
CPC das Bild in Streifen 
aufbaut, als handele es 
sich um eine Jalousie. 
Bleiben wir dazu einmal 
im Modus 2, in dem jedes 
gesetzte Bit einen Punkt 
auf dem Bildschirm ergibt. 
Würde man logisch vor- 
gehen, dann müßte in der 
ersten Adresse des Bild- 
schirmspeichers die ober- 
ste Reihe des ersten 
Zeichens abgelegt wer- 
den. In der zweiten dann 
die zweite Reihe und so 
weiter, bis schließlich 

das nächste Zeichen dran- 
kommt. Nicht so beim 
CPC. Hier wird in ei- 
nem Durchlauf die ober- 
ste Reihe jedes Zeichens 
abgelegt. Von links 

nach rechts und von oben 
nach unten erhält jedes 
Byte nur das oberste 
Achtel der Bildschirmstel- 
le (Skizze 1). Solch eine 
Datenreihe muß 2000 
Bytes enthalten (80*25). 
Scheinbar nur um die 
Verwirrung zu erhöhen, 


Skizze 1 Adressen in dı 


Adr: ' 
0109 


Adr.: 1208 


Adr.: 49232 
(49152488) 


Skizze 2: Farhzuw 


hdr.: 49152 1111018 
“ 
Aar.: 49152 (Mod 
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Forbkonbinabiomen 00 =Pend 01 


benutzt das Betriebssy- 
stem des CPCs aber 2048 
Bytes. Der Überschuß 
wird in der Regel nicht 
genutzt. Hier bietet sich 
für Maschinensprachepro- 
rammierer ein kleiner 
reiraum, wobei jedoch 
zu beachten ist, daß die- 
ser Speicherbereich 
schwer zu verwalten ist 
und bei einem horizon- 
talem Scrolling zerstört 
wird. 
Mit diesem Wissen kön- 
nen wir einmal ein klei- 
nes Programm ausprobie- 
ren. 
Hierbei werden die Spei- 
cheradressen in Schritt- 
weiten zu 2048 (Hexa- 
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dezimal &800) ausgele- 
sen und in vergrößerter 
Weise auf den Bildschirm 
gebracht. Der Binärstring 
gibt genau den Inhalt der 
Speicherzelle wieder. Wer 
will, der kann sich durch 
PRINT a$ das Byte ein- 
mal anschauen. Zur bes- 
seren Wiedergabe haben 
wir jedoch in Zeile 50 die 
Null durch ein Leerzei- 
chen ersetzt und die 1 
durch einen Block. 

Der CPC macht beim Ab- 
speichern und Einlesen 
des Bildschirmspeichers 
natürlich keine STEPS, 
sondern nimmt die Bytes 
in einer langen Kette auf. 
So entsteht ein streifen- 
förmiger Bildschirm, weil 
immer nur ein Achtel je- 
der Bildschirmposition 
aufgebracht wird. 


WOHIN MIT DEN 
FARBEN BEIM MODUS 1 


er Bildschirmdarstellung 


49152 Adr.: 49153 


sisung in Modus 1 


[al1lı la] (Modus 2) 
FL 
us 1) Adn.: 49153 
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Behandeln wir erst ein- 
mal die Bildschirmauftei- 
lung im Modus 1. Bekannt- 
lich sind dabei 40 Zeichen 
in 25 Zeilen möglich. Da 
jedes Zeichen aus 8 mal 8 
Bits besteht, kommt man 
zu einer Auflösung von 
320 Punkten in der Breite 
und 200 in der Höhe. 
Macht insgesamt 8000 
Byte. Der Rest (zu 16 
KByte) geht für die Farb- 
gestaltung drauf. Geben 
Sie bitte einmal 

10 MODE 2:PRINT“ X“ 
20 PRINT BINS(PEEK 


napmı (49152),8) 


sPeni 


'Gewusst wie: Bildschirmspeicher 
"Beispiel 

FOR i=6C808 TO EFFFF 
FOR a=98 TO 3 

PRINT BIN$( PEEK(ita),8);" "; 
NEXT a:PAINT 
NEXT j 
"Gewusst wie: 
"Beispiel ? 
MODE 1 

FOR i=49152 
READ a:POKE 
READ a:POKE i+1,a 

NEXT i:CALL &BBB6 

DATA 119,255,284,255,284, 17,255, 
119,14,8,3, 15,14, 15,12 


STEP 8888 


Rildschirmspeicher 


TO 65535 STEP 2948 
i,a 


ein. Wie zu erwarten, gibt 
der CPC nach dem RUN- 
Befehl die erste Reihe des 
X-Zeichens in binärer 
Schreibweise aus. Man 
erkennt mit der 1 deut- 
lich, wo ein Pixel 
(11000110) gesetzt ist. 
Ändern Sie jetzt einmal 
den Modus in I und 
starten Sie erneut. Der 
Binärstring hat sich geän- 
dert in 11000000, er 
stimmt nur noch in der er- 
sten Hälfte überein. Wenn 
wir uns jetzt noch die 
Speicherstelle 49153 aus- 
geben lassen, dann taucht 
plötzlich die zweite Hälf- 
te (01100000) auf, die 
mit Nullen ergänzt wur- 
de. Tatsächlich stehen ja 
auch zwei Speicherstel- 
len für jedes Zeichen zur 
Verfügung, es bleibt 

Platz für Farbangaben. 


BITPAARE FÜR DIE 
FARBZUWEISUNG 


Wie, dies soll Skizze 2 
verdeutlichen. Aus den 
Angaben eines Bytes wer- 
den Bitpaare gebildet. 
Dabei verläuft die Reihen- 
‚olge der Paare mit 3 —7, 
2 —-6,1-5undO -4. 
Für die erste Hälfte kön- 
nen damit Farbzuweisun- 
gen für ein Pixelpaar gege- 
ben werden. Die Kombi- 
nationen dafür lauten: 


1 (Gelb) 

1 0 Pen 2 (Grün) 

1 1 Pen 3 (Rot) 

Um nun also die Farbe zu 
ändern, müssen wir nur da- 
für sorgen, daß aus der 
ehemaligen 0 — 1-Kombi- 
nation zum Beispiel eine 
1 — 1-für Rot wird. Also 
sollte in die Speicherzelle 
49152 der Wert 11001100 
gepokt werden (POKE 
49152,&CC). Die beiden 
Punkte in der ersten Hälf- 
te der obersten Reihe des 
X werden nun rot. Für 
die zweite Hälfte ist ja 
die Speicherstelle 49153 
zuständig. Mit dem zwei- 
ten kleinen Listing wollen 
wir einmal einen zweifar- 
bigen Buchstaben auf den 
Bildschirm bringen. Nötig 
sind hierzu die Speicher - 
stellen 49152 und 49153 
als Beginn des jeweiligen 
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Buchstabens. Die darun- 
terliegenden Reihen die- 
ses Zeichens erreichen wir 
durch einen Step-Befehl. 
Die Datazeilen wurden mit 
Absicht in hexadezimaler 
Form angegeben, um ein 
Umrechnen in die binäre 
Schreibweise zu erleich- 
tern. Durch den Aufbau 
der FOR NEXT-Schleife 
mußten allerdings die Wer- 
te immer abwechselnd für 
jede Speicherzelle angege- 
ben werden. 


DER MODUS O 
MIT 16 FARBEN 


Wenn man sich die Ände- 
rungen zwischen Modus 0 
und Modus 1 anschaut, 
dann begreift man 
schnell, wie man auf 16 
Farben im Modus O 
kommt. Hier benötigt 
ein Zeichen — oder 
besser die oberste Reihe 
eines Zeichens — gleich 
vier Speicherzellen, es 
ergibt sich aber auch eine 
vierstellige Kombination 
der Farbbits. Ein Zeichen 
belegt also 4 mal 8 
Adressen im Speicher. 
Und da im Modus 1 jede 
Farbzuweisung für ein 
ixelpaar zuständig war, 
gilt eine Bitkombination 
im Modus Null für vier 
Punkte gleichzeitig. Hier 
entsteht also der Zusam- 
menhang zwischen Bild- 
schirmauflösung und 
Farbmöglichkeiten. 
Anhand des bereits Be- 
schriebenen kann jeder 
einmal mit verschieden- 
farbigen Zeichen experi- 
mentieren. Wichtig sind 
lediglich die in nachste- 
hender Tabelle genann- 
ten Kombinationen für 


die Farbzuweisungen. 
0000 = Pen 0 
0001 = Pen I 
0010 = Pen 2 
0011 = Pen 3 
0100 = Pen 4 
0101 = Pen 5 
0110 = Pen 6 
Olll = Pen 7 
1000 = Pen 8 
1001 = Pen 9 
1010 = Pen10 
1011 = Penl2 
1101 = Pen13 
1110 = Pen14 
11ll = Penl5 
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Wir küren regelmässig das "1000-DM-Listing”. 
Dafür erhält der Programmierer bare 1000 DM auf 


die Hand. Allerdings stellen wir da schon etliche 

Bedingungen. Es muss etwas Besonderes sein. Wie 

zum Beispiel das Listing “Gpaint” von Günter 
Radestock. Doch sehen Sie selbst 


STING DES MONATS! 
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Endlich wieder ein ‚Listing des Monats“. In der vori- 
gen Ausgabe beklagten wir noch, daß wir zu wenig 
Auswahl hätten, da bekamen wir die Einsendung von 
Günther Radestock. Schon nach einer Viertelstunde 
waren wir von der Qualität des Programmes überzeugt. 
Und das lag nicht — wie Spötter meinten — an der 
mitgelieferten Demografik. 

Im Grunde genommen gefiel uns einfach alles. Das 
Programm lief ohne jede Anpassung auf allen drei 
CPC-Typen, das Listing war überschaubar und durch- 
dacht und schließlich sandte uns Günther Radestock 
sogar eine ausführliche Bedienungsanleitung, die wir 
selbstverständlich an Sie weitergeben. Zudem 
kommen ein eigenständiges Hardcopy-Programm und 
ein Zeichengenerator hinzu. 

Die Vorzüge des Programmes brauchen wir Ihnen 
nicht zu schildern, Sie können sie bereits aus den 
Fotos entnehmen. Es ist eben alles da, vom Fill-Be- 
fehl bis zur Kopier-Routine von Bildschirmteilen. 

Wir sind sicher, dieses Programm wird von fast allen 
Lesern abgetippt. Wir wünschen dabei viel Spaß 

und belohnen die Mühe von Günther Radestock gerne 
mit 1000,— DM. Vielleicht ist dies ein Ansporn für 
andere Programmierer, uns ihre Top-Listings zuzusen- 
den, damit wir regelmäßig ein ‚‚Listing des Monats“ 
veröffentlichen können. 


HINWEISE ZUM ABTIPPEN DER PROGRAMME: 


Tippen Sie zuerst den Basicteil des Hauptprogramms 
„Gpaint‘‘ ab und speichern Sie ihn unter dem Namen 
“GRAFIK.BAS“ auf Kassette oder Diskette ab. Da- 
nach geben Sie bitte den Datalader ein, der das Binär- 
file “GRAFIK.BIN“ erzeugt (steht im Kopf des Data- 
laders) und speichern ihn sicherheitshalber ab. Da- 
nach wird er mit RUN gestartet, das Binärprogramm 
“GRAFIK.BIN“ erzeugt und automatisch abge- 
speichert. Arbeiten Sie mit einem Kassetten- 
recorder, dann achten Sie bitte darauf, daß sich das 
Binärfile direkt hinter dem Basicprogramm 
“GRAFIK.BAS“ befindet. 
Als nächstes muß das Basicprogramm der Hardcopy- 
routine eingegeben und unter dem Namen “HCOPY. 
BAS“ abgespeichert werden. Danach wird der Data- 
lader eingegeben, welcher das Binärfile “HCOPY. 
BIN“ erzeugt (steht im Kopf), sicherheitshalber abge- 
speichert und dann mit RUN gestartet. 
Nun wird der Binärteil erzeugt und abgespeichert. 
(Für Kassettenbesitzer bitte wieder direkt hinter 
‘HCOPY BAS“.) 
Jetzt wird der Basicteil des Zeicheneditors eingege- 
ben und mit “FONTED.BAS“ abgespeichert. Danach 
muß der Datalader für den Binärteil “PROPORT.BIN‘“ 
eingegeben und wieder sicherheitshalber abgespeichert 
werden, danachmit RUN starten. Dadurch wird das 
Binärfile “PROPORT.BIN“ erzeugt und abgespei- 
chert (Kassettenbesitzer wieder bitte direkt hinter 
“FONTED.BAS“). Auf der Kassette/Diskette befin- 
den sich nun das leistungsstarke Grafikprogramm 
GPAINT, eine tolle Hardcopyroutine und der komfor- 
table Zeichensatzeditor. (TB) 


Unser Autor Günther Radenstock hat ein Grafikpro- 
gramm geschrieben, das wirklich das Prädikat ‚‚Sehr 


schr ......LISTING 


gut“ erhalten kann. Das Gesamtprogramm besteht 
aus dem eigentlichen Zeichenprogramm ‚„Grafik““, 
aus einer leistungsfähigen Hardcopy-Routine und 
aus dem Zeicheneditor ‚‚Fonted‘“. 

Bei Fonted handelt es sich um einen Zeicheneditor, 
mit dem die Proportionalschriftzeichensätze von 
Gpaint verändert werden können. 

Nach dem Starten erscheint das Hauptmenü auf 
dem Bildschirm, in der Mitte ein Fadenkreuz. Das 
Fadenkreuz kann mit den Pfeiltasten oder einem 
angeschlossenem Joystick bewegt werden. 

Eine Funktion wird ausgewählt, indem das Faden- 
kreuz auf das entsprechende Piktogramm bewegt 
wird und dann die Feuertastel am Joystick oder 
die ENTER- oder COPY-Taste der Tastatur ge- 
drückt wird. Die entsprechende Funktion wird so- 
fort ausgeführt und nicht, wie bei manchen anderen 


Programmen, erst angekreuzt. Bei Zeichenbefehlen, 
wie Punkt oder Linie, schaltet das Programm zum 
Beispiel sofort auf den Bildschirm mit der Grafik um. 
Verlassen wir eine Funktion mit der Leertaste. 
Außerdem bietet das Programm noch einige Spezial- 
funktionen, die beim Zeichnen über bestimmte 
Tasten zu erreichen sind: 

DEL löscht die vorausgehende Operation, wenn das 
Menü und die R-Taste noch nicht benutzt wurde. 

C ändert die Stiftfarbe, wenn kein Muster ausgewählt 
wurde (geht auch über Farbmenü). 

R setzt eine Funktion an ihren Anfangszustand zu- 
rück, ohne die Grafik zu beeinträchtigen. Wirkt wie 
Verlassen der Funktion und neu anwählen (sinnvoll 
z.B., um einen neuen Anfangspunkt bei Linien zu 
setzen). 
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M legt sofort ein Muster über neu gezeichnete Teile 
(——> Muster). 

Es folgt eine Beschreibung der Programmfunktionen 
im Einzelnen: 


1. Punkt 

Beim Betätigen der Feuertaste, von COPY oder 
ENTER wird an der Position des Fadenkreuzes in der 
gewählten Farbe und Strichstärke gezeichnet. Durch 
Gedrückthalten des Feuerknopfs kann auch gemalt 
werden. Muster werden erst beim Verlassen der Funk- 
tion oder Betätigen der M-Taste erzeugt. 


2. Linie 

Es wird zuerst der Anfangspunkt, dann der Endpunkt 
einer Linie angegeben. Die Linie wird in der gewählten 
Farbe und Strichstärke gezeichnet, Muster erst später. 


Nach einmaligem Zeichnen kann eine Parallele überall 
auf dem Bildschirm gezeichnet werden. Es ist auch 
möglich, die erzeugte Linie als „Strichstärke“ zu miß- 
brauchen und bei gedrücktem Feuerknopf mit ihr 
zu zeichnen. 


3. Linien . 
Funktioniert im Prinzip wie Linie, nur, daß vom End- 
punkt der Linie aus weitergezeichnet werden kann. 


4. Strahl 
Wie Linien, nur der Anfangspunkt bleibt fest. 


5. Rahmen 

Funktioniert wie Linie, nur, daß statt der Anfangs- 
und Endpunkte einer Linie die beiden diagonalen 
Ecken eines Rechtecks angegeben werden. 


6. Box 

Wie Rahmen, nur wird eine ausgefüllte Schachtel ge- 
zeichnet. Die Strichstärke spielt dabei keine Rolle. 
Muster werden sofort erzeugt. Box kann als Radier- 
gummi benutzt werden, wenn die Hintergrundfarbe 
als Stiftfarbe (Farbel) gewählt wird. 


7. Kreis 

Dient zum Zeichnen von Kreisen oder Elipsen. Zu- 
erst wird der Mittelpunkt angewählt, von dort aus 
wird ein Rechteck ausgefahren, in das dann der Kreis 
(die Ellipse) gelegt wird. Der Kreis wird in der aktuel- 
len Strichstärke und Farbe erzeugt. Gemustert wird 
später. 


8. Scheibe 
Gefüllte ‚Kreise‘, ähnlich Box. 


9. Kopie 

Ein Bildbereich wird eingerahmt, der Rahmen verscho- 
ben und an die neue Stelle kopiert. Kann, wie z.B. 
Box, mehrmals gemacht werden. 


10. Füllen 

Von einem Punkt aus wird in der aktuellen Farbe, 
bzw. im aktuellen Muster, bis zu einem andersfarbi- 
gem Rand ausgefüllt. 


11. Invers 
Wie Box, nur wird die Fläche entsprechend invertiert. 


12. Löschen 

Nach Drücken der J-Taste wird der Bildschirm gelöscht. 
Jede andere Taste, auch die Feuerknöpfe, brechen die 
Operation ab. 


13. Lupe 

Ein Rechteck wird an die gewünschte Stelle bewegt, 
nach Drücken der Feuertaste der entsprechende Aus- 
schnitt vergrößert. Als Cursor erscheint dann ein klei- 
nes, bewegliches Rechteck. Mit dem Druck auf die 
Feuertaste wird der angefahrene Punkt in die aktuelle 
Farbe geändert. Die Farben können günstig mit der 
C-Taste gewählt werden. Mit der Leertaste (oder 
Feuer?) gelangt man ins Bild zurück. Achtung: Die 
DEL-Taste hat hier keine Wirkung. Lupe schaltet ein 
gewähltes Muster ab. 


14. Stift 

Am unteren Bildrand erscheint ein Menü mit vier ver- 
schiedenen Strichstärken. Sie können nun einen Stift 
auswählen, indem Sie in das entsprechende Feld fah- 
ren und Feuer drücken. Der ganz rechte Stift wird als 
Sprühdose benutzt und hat nur bei PUNKT Wirkung. 


15. Farben 

Es erscheint ein Farbmenü mit der dem Modus entspre- 
chenden Anzahl Farben. Zum Zeichnen kann die 
Stiftfarbe wie der Stift ausgewählt werden. Die Stift- 
farbe (Farbel) wird immer im Bildrand angezeigt. Die 
oberste Zeile des Farbmenüs besitzt jedoch einen 

Pfeil an ihrer linken Seite, der anzeigt, daß Sie, wenn 
Sie den Schriftzug anfahren und Feuer drücken, wei- 
tere Menüzeilen wählen können. Diese sind: Farbe2 
wählen (Farbe? ist die Hintergrundfarbe für Muster) 
und Farbe ändern. Beim Ändern einer Farbe erscheint 
eine Farbpalette, die sich unter einem Rechteck durch- 
schieben läßt, um der Farbe die entsprechende Ink 
zuzuordnen. 

Bitte lesen Sie weiter auf Seite 56 
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1 RRRRRRRHHISIRHHIETRIIHIIHUHIRI IHRES 
2a ’# GPAINT V1.4 * 
3 ’# GRAF IK/MALPROGRAMM * 
4 '* VON * 
5 # GUENTHER RADESTOCK * 
6 ’* FUER #* 
tt SCHNEIDER AKTIV * 
8 ’* CPC 464/664/6128 tb# 
g RRRHRRHRRERRHRSRRSRRRESISHHIEISIEIFFTE 


18 "benoetigt File "grafik.bin" 

98 MODE 1:INK 8,8:INK 1,24:INK 2,14 
:INK 3,1:BORDER ® 

188 ON ERROR GOTO 118:| SCREEN1:GOTO 
178 

118 WINDOW 6,34,6,18:PEN 1:PAPER 3: 

CLS:SPEED INK 5,5 

128 LOCATE 18,4:PARINT"Gpaint v1.4"”: 

RESUME 138 

138 LOCATE 3,7:PRINT"Autor: 

r Radestock"”:SYMBOL AFTER 256 

148 LOCATE 6, 18:PRINT"is loading Co 

de ...":PAPER ® 

158 MOVE 78,118:DRAW 544,118,2:DRAW 
544,320:DRAW 78,328:DAAW 78,118 

168 MEMORY 32767:L0AD"grafik.bin”,3 

2768:CALI. 32768:CLEAR:MEMORY 14335 

178 ON ERROR GOT0 8:5PEED KEY 15,1: 

CALL &BB48:KEY DEF 66,8,32 

188 DEFINT a-z:DIM xink( 15) :INK 3,3 
:CALL &BBB6 

198 FOR i=8 TO 

i,xink(i) :NEXT 

208 DATA 8,24,14,6,1,3,8,9,13,15,19 
‚26,12,16,4,18 

218 xmode=1:pn=®@:muster=®:mnr=8:del 

$=CHR$( 127) :DEF FN m$( a$) =LEFT$(a$, 

LEN( a$) -1) 

228 color=1:color2=8:BORDER xink( 1) 
:] MODE, , xmode :as=2"( 2-xmode) :mxf=2"a 

s-1 

225 x=320:y=208 

238 | COPY2:| SCREEN2 

248 | FORCE: | MENU: | GPEN,color:| GPAPE 

R,color2 

258 IF muster THEN | SELECT,mnr:| PSM 

ALL,66682 ELSE |GPEN,1:1BOX, 144,86, 
176,70 

268 IGPEN,1:| PEN,pn:| PLOT,56,78 

278 GOSUB 348:| CUR,@x,@y,@x,@y,8:3$ 

=INKEY$:GOSUB 348 

288 IF a$<>"X” AND a$<>" "THEN 278 

298 fk=6*#((y-4) \54) +1-(x>104) -(x>21 

8) -(x>316) -( x>424) -( x>528) 

318 ON fk GOTO 1618, 1578,698, 1270, 1 

458, 1850, 3790,450,328,328,2838, 1915, 
1218, 1248, 328,328, 1288, 1398,96, 112 

0,328,328, 1828, 1078 

328 | SCREEN1:G60SUB 368:G60T0 238 

338 I COPY2:| SCREEN1 :: cmd=8: RETURN 

348 WHILE JOY( 8) >15:WEND: RETURN 


Guente 


15:READ xink(i) :INK 


350 GOSUB 349:60T0 928 
355 WINDOW 1,80,1,11:CL5:MOVE 8,222 
:DRAW 639,222, 1:RETURAN 

368 a$=UPPER$( INKEY$) :IF a$=""THEN 
368 ELSE RETURN 

365 WINDOW 1,88,22,25:CL5:MOVE 8,64 
:DRAW 639,64: RETURN 


378 ’Stift 
388 GOSUB 365 
398 a$=" Stift-Auswahl”:]| WRITE,@a 


$,22:] INVERT, 22 

488 FOR i=8 TO A488 STEP 168:| FRAME, 
i+4,2,i1+152,44 

418 | PEN,i\168:| PLOT,i+80,24:NEXT:| 
CUR,ex,@ey,@x,@y,8 

428 a$=INKEY$:IF a$=" "THEN 248 ELS 
E IF a$<>"X”"THEN 270 

438 IF y<48 THEN pn=x\168 

448 GOTO 248 

458 ’Muster 

468 GOSUB 365:| GPAPER,® 

478 1BOX,48-as,32,88,14:FOR i=8 TO 

7:1 SELECT,i:| PSMALL , E473E+8*i 

488 | FRAME, 112+64#i-as, 32, 112+64*#i+ 
32,14:NEXT 

498 a$( 8) =CHR$( 255) +" Muster waehle 


n ":fk=8 

588 a$l 1) =CHR$( 255) +" Muster editie 
ren " 

518 IWAITE,@a$( fk) ,22:| INVERT,22 


528 GOSUB 348:| CUR,@x,@y,@x,@y,8 
538 a$=INKEY$:IF a$=" "THEN 248 ELS 
E IF a$<>"X"THEN 278 

548 IF y>64 THEN 248 

558 IF y>46 THEN fk=1-fk:60T0 518 
S6B8 x1=x:IF x1<32 THEN x1=32 ELSE I 
F x1>688 THEN x1=698 

578 mnr=( (x1-32) \64) -1:muster=(mnr> 
=) 

588 IF fk=8 OR(NOT muster) THEN 248 
ELSE x=8:y=8:1 FRAME, 192-as, 368,448, 
238 

598 | SELECT,mnr:| PBIG:| PSMALL ‚66682 
:1 XOR 

6088 | FRAME, 192+x#8*#as+as, 364-16*%y, 1 
92+x#8#tas+6*as, 354-16%#y 

618 a$=INKEY$:IF a$="" THEN 618 

628 IF a$=" "OR a$="Z" THEN x=320:y 
=288:G0T0 238 ELSE IF a$=CHRA$( 16) TH 
EN | PCLEAR:GOTO 598 

638 IF a$=CHRA$( 13) OR a$=CHRA$( 224) 0 
AR a$="X"THEN | PSET,x,y:G0OTO 598 

648 IF a$=CHR$( 242)0R a$=CHR$( 8) THE 
N x=(x+31)MOD{ 32\as) :G60T0O 598 

658 IF a$=CHR$( 248)0OR a$=CHR$( 11) TH 
EN y=( y+7)MOD 8:60T0 598 

668 IF a$=CHR$( 241)0R a$=CHR$C 18) TH 
EN y=(y+1)MOD 8:60T0 598 

678 IF a$=CHA$( 243) OR a$=CHRA$( 9) THE 
N x=(x+1)MOD( 32\as) :60T0O 598 
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688 GOTO 618 

698 ’Farben 

788 a$( 8) =-CHR$( 255) +” Farbe-1i1 waehl 
en ":fk=8 

718 a$( 1) =CHRA$( 255) +” Farbe-2 waehl 
en e. 

728 a$( 2) =CHR$( 255) +" Farbe aendern 


738 GOSUB 365 :x1=648\(mxf+1) 

748 |IFRAME,as,44,x1-as-as,2:FOR i=1 
TO mxf+1 

758 IGPEN,i:1BOX,x1%#%i+as,44,x1#i+x1 
-as-as,2:NEXT:I| GPEN, 1 

768 |IWARITE,@a$(fk) ,22:| INVERT,22 
778 GODSUB 348:| CUR,@ex,@y,@x,@y,8 

788 a$=INKEY$:IF a$=" "THEN 248 ELS 
E IF a$<>"X"THEN 278 

798 IF y>64 THEN 248 

888 IF y>46 THEN fk=(fk+1)MOD 3:60T 

O0 768 

818 IF fk=1 THEN color2=x\x1 ELSE c 
olor=x\x1 

828 j=xink( color) :BORDER j:IF fk<2 
THEN 248 

838 ’Palette 

848 POKE EC7E1,8:MODE 8:INK 8,8:FOR 
i=8 TO 8:INK i+2,8:|GPEN,i+2 

858 | BOX, 16+68*i, 136, 76+68*#i,264:NE 

XT:IGPEN,1:INK 1,26,8:| FRAME , 292,26 

0,344,1408 

868 FOR i=8 TO 8:INK i+2,( j+i+23) MO 
D 27:NEXT 

878 GOSUB 368:IF a$=CHA$( 242)0R a$= 
CHR$( 8) THEN j>=( J+26) MOD 27:G0TO 86 

[4] 

898 IF a$=CHRA$( 243) OR a$=CHRA$( 9) THE 
N j=( j+1)MOD 27:GOTO 868 

9u8 IF a$="X”"OR a$=CHR$( 13) OR a$=CH 
AR$C 224) THEN BORDER j:xink(color)=j 
ELSE IF a$<>” "AND a$<>"Z”THEN 878 
918 MODE xmode:FOR i=8 TO 15:INK i, 
xink(i) :NEXT:GOTO 238 

928 ’Csr 

938 IGPEN,1:IF cmd=®8 THEN x1=x:y1=y 
948 |CUR,@ex,@y,@x1,@y1,cmd:a$=_LOWER 

$CINKEY$) :IF a$="m"THEN GOSUB 1818: 
IGPEN, 1:G0TO 948 ELSE IF a$="c"THEN 
IF muster THEN GOSUB 18198:G0SUB 95 
8:1 COPY2:| GPEN, 1:GOTO 948 ELSE GOSU 

B 958:G0T0 948 ELSE IF muster THEN 
IGPEN,mxf:RETUAN ELSE IGPEN,color:R 

ETURN 

958 color=( color+1)MOD(mxf+1) :BORDE 
A xink( color) :RETURN 

968 ’Malen 

978 GOSUB 338 

988 GOSUB 928:IF a$="x"THEN | PLOT,x 
‚yv:60T0O 988 

998 IF a$=del$ THEN | COPY1:GOTO 988 
ELSE IF a$<>” "THEN 988 


1888 GOSUB 1818:G0T0 238 

1818 IF muster THEN |GPEN,color:| GP 

APER,color2:| PATTERN 

1815 RETUAN 

1828 ’line 

1838 GOSUB 338 

1848 cmd=8:G0OSUB 928:IF a$=" "THEN 
1888 ELSE IF a$<>"x"THEN 1848 

1858 cmd=4:605UB 928:IF a$="x"”THEN 
ILINE,x,y,x1,y1:x=x1:y=y1:G0OTO 1858 
1868 IF a$="r"THEN GOSUB 1818:| COPY 

2:G0TO 1848 ELSE IF a$=del$ THEN IC 

OPY1:60T0 1848 ELSE IF a$<>" "THEN 
1858 ELSE 1888 

1878 ’rays 

1888 GOSUB 338 

1898 cmd=8:G05SUB 928:IF a$=" "THEN 
1888 ELSE IF a$<>"x"THEN 1898 

1186 cmd=4:G05SUB 928:IF a$="x"THEN 
ILINE,x,y,x1,y1:GOTO 1188 

1118 IF a$="r"THEN GOSUB 1818:| COPY 

2:G0TO 1898 ELSE IF a$=del$ THEN IC 

OPY1:60TO 1898 ELSE IF a$<>” "”THEN 
1188 ELSE 1888 

1128 ’lines 

1138 sbm=1:cmbk=2:6G0T0 1158 

1148 |LINE,x,y,x1,y1:RETURN 

1158 GOSUB 338 

1168 cmd=8:605UB 928:IF a$=" "THEN 
1888 ELSE IF a$<>"x"THEN 1168 

1178 GOSUB 348: cmd=2+cmbk :GOSUB 928 
:IF a$="r"THEN 1168 ELSE IF a$=" "T 

HEN 1888 ELSE IF a$<>"x"”THEN 1170 
1188 ON sbm GOSUB 1148, 1238, 1268, 12 

72,2180,2218 

1198 cmd=cmbk :G0OSUB 928:IF a$="x"TH 

EN 1188 ELSE IF a$="r"THEN GOSUB 18 
18:1 COPY2:GOTO 1168 ELSE IF a$=del$ 
THEN | COPY1:G0OTO 1168 ELSE IF a$<> 
”" "THEN 1198 ELSE IF sbm<5 THEN 188 

8 ELSE 230 

1218 ’Rahmen 

1228 sbm=2:cmbk=1:G6G0T0 1158 

1238 ILINE,x,y,x1,y:1LINE,x1,y,x1,y 
1:1 LINE,x1,y1,x,y1:1LINE,x,y1,x,y:R 

ETURN 


1248 ’Box 

1258 sbm=3:cmbk=1:G0OT0 1158 

1268 IBOX,x,y,x1,y1:G0TO 1818 

1278 "Invers 

1271 sbm=-4:cmbk=1:G6G0T0 1158 

1272 IXOR:IBOX,x,y,x1,y1:GOSUB 348: 
GOTO 19818 

1288 ’Kreis 


1285 cmbk=1 

1298 GOSUB 338 

1388 cmd=8:G0SUB 928:IF a$=" "THEN 
1888 ELSE IF a$<>"x”THEN 1388 ELSE 
mMx=x:my=y 

1318 cmd=5:605UB 358:IF a$="r"THEN 
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1388 ELSE IF a$=" 
F a$<>"x"THEN 1318 
1328 IF x=x1 OR y=y1 THEN 1318 ELSE 
rx=ABS( x-mx) :ry=ABS( y-my) :msk=&FFF 
XOR(l as-1) :stp!=rx/ry:s!=ry#ry 

1338 ON cmbk GOSUB 1368, 1418 

1348 cmd=1:6G05UB 928:IF a$=" "THEN 
1888 ELSE IF a$="r"THEN GOSUB 1818@: 
ICOPY2:G0TO 1388 ELSE IF a$=del$ TH 
EN ICOPY1:6G0T0 1388 ELSE IF a$=-" "T 
HEN 1888 ELSE IF a$<>"x"THEN PRINT 
CHA$C 7); :G0TO 1348 

1358 mx=(x+x1) \2:my=(y+y1)\2:G0T0O 1 
338 

1368 hi=rx AND msk:i1=-8:FOR i=2 TO 
ry STEP 2:h=(SQR( s!-(i-8.5)*(i-®.5) 
)®stp!)AND msk:IF h1>h THEN hh=h+as 
ELSE hh=h 

1378 ILINE,mx+h1,my+i1,mx+hh,my+i1: 
ILINE,mx-h1,my+i1,mx-hh,my+il 

1388 ILINE,mx+h1,my-i1,mx+hh,my-i1: 
ILINE,mx-h1,my-i1,mx-hh,my-i1:i1=i: 
h1=h:NEXT:| LINE,mx+h,my+i1,mx-h,my+ 
i1:I LINE,mx+h,my-i1,mx-h,my-i1:RETU 
AN 

1398 ’Scheibe 

1488 cmbk=2:G0T0 1298 

1418 MOVE mx-(rx AND msk) ‚my:DRAW m 
x+({rx AND msk) ,‚my:FOR i=2 TO ry STE 
P 2:h=(5QA( s!-(i-8.5) *(i-8.5))*stp! 
JAND msk :MOVE mx-h,my+i:DRAW mx+h,m 
y+i:MOVE mx-h,my-i:DRAW mx+h,my-i:N 
EXT:G0OSUB 1818:RETUAN 

1428 IF x<® THEN x=® ELSE IF x>568 
THEN x=568 

1438 IF y<® THEN y=@8 ELSE IF y>35® 
THEN y=358 

1448 RETURN 

1458 ’Lupe 

1468 GOSUB 338:WINDOW 1,88,1,25:cmd 
=1 

1478 GOSUB 1428:x1=x+808-as:y1i=y+48B: 
GOSUB 358:IF a$=" "THEN 238 ELSE IF 
a$<>"x"THEN 1478 

1488 | ZOOM,x,y+48:mx=48:my=12 

1498 IF mx>=88 OR mx<® OR my>24 OR 

my<®B THEN x=x+mx-40: y=y+2%#my-24:605 

UB 14298:G0T0 1488 

1588 IGPEN, 1:1 X0OR:GOSUB 1565 

1518 GOSUB 369:G0SUB 1565:IF a$="x” 
OR a$=CHRA$( 13) OR a$=CHR$( 224) THEN | 

FORCE: | WSCREEN1:PLOT x+mx, y+2#my,co 
lor:| WSCREEN2:LOCATE mx\as+1,25-my: 

PAPER color:PRINT” "”;:PAPER 8:6G0TO 
1588 

1538 IF a$="C"THEN GOSUB 958 ELSE I 
F a$=" "OR a$="Z"THEN 1468 

1548 IF a$=CHRA$( 242)0R a$=CHRA$( 8) TH 
EN mx=mx-as ELSE IF a$=CHA$( 243) OR 
a$=CHR$( 9) THEN mx=mx+tas 


"THEN 18808 ELSE I 


1558 IF a$=CHRA$( 248) OR a$=CHRA$C 11) T 

HEN my=my+1 ELSE IF a$=CHA$( 241) 0R 

a$=CHA$( 18) THEN my=my-1 

1568 GOTO 1498 

1565 I FRAME, B#tmx+as, 16#my+2, B#mx+6* 
as, 16#my+12:RETURAN 

1578 GOSUB 365:a$="Bild loeschen 
OkK”:| WAITE,@a$,24:] FRAME,452,2,636, 

46:1 CUR,@ex,@ey,@x,@y,@ 

1598 a$=LOWER$( INKEY$) :IF a$="x"AND 
y<=46 AND x>=452 THEN I WSCREENI:CL 
G 8:| SCREEN2:G0TO 238 ELSE 248 


1618 REM ’Diskmenue 

1628 GOSUB 355 

1638 a$=" Directory"”:|IWAITE,@a$,3 
1648 a$=" Bild speichern” :| WRITE,®@ 
a$,4 

1658 a$=" Bild laden"”:|WRAITE,@a$,5 
1668 a$=" Zeichensatz laden" :| WRIT 
E,@a$,6 

1678 a$=" Ausschnitt laden"”:| WRITE 
‚ea$,7:3$=" File(s) loeschen"”:|WRI 
TE,@a$,8 


1680 n=6:G05UB 1780:IF a$=" "THEN 2 
38 ELSE ON fk GOTO 1848, 1838, 1818, 1 
845, 2240, 1690 

1698 GOSUB 1778:| ERA,@n$:G0OTO 1618 

1788 fk=1 

1718 | INVERT,fk+2:G05UB 368:| INVERT 
‚fk+2:IF a$="Z"THEN a$=" "ELSE IF a 
$=CHR$C 13) OR a$=CHA$( 224) THEN a$="X 


1738 IF a$="X"OR a$=" "THEN 348 
1748 IF a$=CHRA$( 248)0AR a$=CHR$C 11) T 

HEN IF fk>1 THEN fk=fk-1 

1758 IF a$=CHA$[ 241)0R a$=CHRA$C 10) T 

HEN IF fk<n THEN fk=fk+1 

1768 GOTO 1718 

1778 CLS:a$="Filename:":| WAITE,@a$, 
2:PRINT:PRINT:n$="":CALL &BB81 

1788 GOSUB 368:IF a$=CHA$( 13) THEN C 

ALL &BB84 : RETURN 

1798 IF a$=CHRA$C 127) THEN IF n$<>""T 
HEN n$=FN m$(n$) :PRINT CHA$( 8)" "CH 

A$(8) ;:GOTO 1788 ELSE 1788 

1888 IF LEN(n$)<16 THEN n$=n$+a$:PRA 
INT CHA$( 1) ;a$; :G0OTO 1788 ELSE 1788 
1818 GOSUB 1778:1 LOAD,49152,@n$: j=®8 
:FOR i=&C7D8 TO EC7DF: j=j+PEEK(i):N 
EXT:IF j MOD 256<>PEEK(E&EC7E1)OR j=8 
THEN 238 ELSE FOR i=8 TO 15:xinkl(i 
)=PEEK( &6C7D8+i) :INK i,xink(i) :NEXT: 
xmode=PEEK( E&EC7EB) :GOTO 228 

1838 GOSUB 1778: j=@8:FOR i=8 TO 15:P 
OKE &C7D8+i,xink(i) :j=j+txink(i) :NEX 
T:POKE EC7EB,xmode:POKE EC7E1,3j MOD 
256:] SAVE,49152,@n$:GOTO 238 

1848 MODE 2:] CAT:WHILE INKEY$="":WE 
ND:MODE xmode:| COPY2:G0TO 1618 

1845 GOSUB 1778:|1 LOAD,&9718,@n$:6OT 
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0 238 

1858 ’5-Menue 

1868 GOSUB 355 

1878 a$=" Aufloesung”:|IWAITE,@a$,3 
:a$=" Text":|WAITE,@a$,4 

1888 a$=" Vergroessern"”:|WAITE,@a$ 
‚5:a$=" Verkleinern":| WARITE,@a$,6 

1988 a$=-" Drehen" :|WRITE,@a$,7:n=5 


:G0SUB 1788:IF a$=" "THEN 238 ELSE 
ON fk GOTO 1918, 1948,2208,2178,2128 
1918 CLS:a$=" Mode B ( 168*2988)":|W 
RITE,@3$,3:3$=" Mode 1 (3298*200)"”: 
IWAITE,@3$,4:a$=" Mode 2 (648*280) 
":IWAITE,@a$,5:n=3:G0SUB 1788:IF a$ 
=” "THEN 238 ELSE xmode=fk-1:60T0 2 

28 

1915 ’Fuellen 

1928 I COPY2:1 SCREEN1:cmd=® 

1938 GOSUB 358:IF a$=" "THEN 238 EL 
SE IF a$=del$THEN | COPY1:60TO 1938 
ELSE IF a$<>"x"THEN 1938 ELSE I FILL 
‚x1,y1:G0SUB 1818:G0T0 1938 

1948 GOSUB 355:a$="Text eingeben:"”: 
n$="":f$="":| WRITE,@a$,2:| GPEN, 1:x= 

4:1 XO0R 

1945 GOSUB 1988 

1958 a$=INKEY$:IF a$=""THEN 1958 EL 
SE GOSUB 1988:IF a$=CHRA$( 13) THEN IF 
n$=""THEN 225 ELSE 1998 ELSE IF a$ 
<” "OR ASC(a$)>127 THEN 1945 

1968 IF a$=del$ THEN IF n$<>""THEN 
x=x-ASC( RIGHT$CF$,1)) :| CHAR, ASC( RIG 
HT$Cn$,1)),x,308,@1:f$=FN m$(f$) :n$ 
=FN m$(n$) :GOTO 1945 ELSE 1945 

1978 1=8:| CHAR,ASC(a$) ,x,300,@1:x=x 
+1:F$=F$+CHR$L1) :n$=n$+a$:a$=del$:1 
F x>=648 OR LEN(n$) >88 THEN 1968 EL 
SE 1945 

1988 MOVE x,388:DRAWR B8,-8:DRAWR 8, 
8: RETURN 

1998 y=-208:x1=-4:y1=y:cmd=-2:x=x-as:| 
COPY2:| SCREEN! 

28088 GOSUB 928:IF a$=" "THEN 238 EL 
SE IF a$=del$THEN | COPY1:GOTO 2888 

ELSE IF a$="r"THEN | COPY2:| SCREEN2: 
GOTO 1948 ELSE IF a$<>"x"THEN 2888 

ELSE GOSUB 348 

2818 j=x1:FOR i=1 TO LEN(n$) :| CHAR, 
ASC(MID$Cn$,i,1)),3,y1,@1:3j=j+1:NEX 
T:G605UB 1818:60T0 2888 

2838 ’Kopieren 

2848 GOSUB 338 

2858 cmd=8:G05SUB 928:IF a$=" "THEN 
238 ELSE IF a$<>"x”"THEN 2050 

2868 cmd=3:G0SUB 358:IF a$=" "THEN 

238 ELSE IF a$="r"THEN 2858 ELSE IF 
a$="x"THEN GOSUB 3888 ELSE 29868 

2078 GOSUB 2118:cmd=1:GOSUB 358:6G0S 
UB 2118:IF a$="r"THEN ICOPY2:GOTO 2 

858 ELSE IF a$=" "THEN 238 ELSE IF 


a$=del$THEN | COPY1:G0TO 2858 ELSE I 
F a$<>"x"THEN 2878 ELSE fk=8:GOSUB 
3838:G0T0 29878 

2118 IXOR:I GPEN, 1:1 FRAME,mx ,my,x1-x 
+mx , y1-y+my: RETURN 

2128 GOSUB 338 


2138 cmd=98:G0SUB 928:IF a$=" "THEN 
238 ELSE IF a$<>"x"THEN 2130 


2148 cmd=6:G0SUB 358:IF a$=" "THEN 

238 ELSE IF a$="r"THEN 2138 ELSE IF 
a$g<>"x"THEN 2148 ELSE IF x1<x THEN 
J-x1l:x1=x:x=Jj:jmyl:yl=-y:y=j 

2158 I TURN,x,y,x1,y1 

2168 cmd=1:G05SUB 358:IF a$=" "THEN 
238 ELSE IF a$=del$THEN | COPY1:GOTO 
2138 ELSE IF a$="r"THEN | COPY2:GOT 

0 2138 ELSE IF a$="x"THEN 2158 ELSE 
21608 

2178 sbm=-5:cmbk=1:G0T0O 1158 

2188 IF x<>x1 AND y<>y1 THEN | SMALL 
‚x1,y1,x,y 

2198 GOTO 348 

2288 sbm=6:cmbk=1:G0T0 1158 

2218 mx=2#x1-x+as#5GN( x1-x) :my=2#y1 

-y+2#6GN( y1-y) :IF x1=x OA yi=y THEN 
RETURN ELSE IF my>398 THEN y1>=( 488 
-y)\2+y-2 AND 518:my=y1 ELSE IF my< 

8 THEN y1i=y\2+2 AND 518:my=y1 

2228 j=1824-as:IF mx>=648 THEN x1=( 

648-x) \2+x-as AND j:mx=x1 ELSE IF m 

x<d THEN x1=x\2+as AND j:mx=x1 

2238 IMAGNIFY,x,y,x1,y1:x1=mx:y1i=my 
:GOTO 348 

2248 GOSUuB 1778:IF a$=""THEN 238 EL 

SE ILOAD, 16384 ,@n$:muster=8 

2258 | SCREEN2:cmd=8:GOSUB 348 :GOSUB 
9208:IF a$=" "THEN 238 ELSE IF a$<> 
"x"THEN 2258 

2268 cmd=3:G05UB 358:IF a$=" "THEN 

238 ELSE IF a$="r"THEN 2258 ELSE IF 
a$<>"x"THEN 2268 ELSE GOSUB 38088 

2278 | SCREENI:cmd=1:605UB 358:IF a$ 

=" "THEN 238 ELSE IF a$="r"THEN 225 

® ELSE IF a$<>"x"THEN 2278 ELSE fk= 
128:G0SUB 38398:G0T0 22708 

3888 IF xi<x THEN j=x:x=x1:x1=J 

3818 IF yi<y THEN j=y:y-y1:y1=-j 


3028 mx=x :my=y:RETURN 

3838 I COPY,fk,mx,my,x1-x+mx, yi-y+my 
‚*%,y:RETURAN 

\ . 
SENT BYE 
ÜNOHNOHS EN 


LESERBRIEFE UND FRAGEN SIND UNS STETS 
WILLKOMMEN. WIR BEANTWORTEN SIE ENTWEDER 
DIREKT ODER AUF DER LESERBRIEFSEITE 
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180 (Reste 
288 ’”* GRAFIK-DATALADER ERZEUGT * 
300 ’* BINAERFILE GRAFIK.BIN * 
488 ’* FUER PROGRAMM GRAFIK.BAS *# 
[ST -Tı Wd 2 5.8.8.2 8. 2.8.2 8.2.8.2.2.2.2.2.2.2:2 8.2.2.2.8.2.2.2.2.3 
558 MEMORY E7FFF 


568 CLS:PRINT"BITTE WARTEN, IHR CPC 
ARBEITET...” 

658 a=-68888:e=-&69DB5: zb=-1888:e=e+1 
668 FOR i =a TO e:READ d$:IF LEFT$(C 
d$,1)="&” THEN flag =-1 

678 IF (flag AND ps<>VAL(d$)) THEN 
PRINT”Fehler in Zeile "zb+1:END 

688 IF (flag AND i=e) THEN CLEAR:SA 
VE"”GRAFIK.BIN"”,B,&8888,8&1D85: END 
698 IF flag THEN i=-i-1:zb=zb+1:ps=® 


:d$="":flag = 8:60T0 738 

7088 d$="&"+d$:POKE i,VAL(d$) :ps=ps+ 
VAL(d$): 

738 IF i < e THEN NEXT i 


1881 DATA 01,09,80,21,27,81,C3,D1,B 
C,77,80,C3,52,82,C3,C8,84,C3,2B,81, 
C3,31,81,C03,37,81,C3,&68D5A 
1882 DATA 3C,81,C3,48,81,03,6A,81,C 
3,AA,81,C3,B4,81,C3,AF,81,C3,BB,81, 
C3,CA,81,C3,C2,81,C3,&189E 
1883 DATA F1,81,C3,B9,84,C3,E5,84,C 
3,C1,85,C3,F4,85,C3,11,86,C03,4F,86, 
C3,B4,86,C3,28,87,C3,61187 
1884 DATA 75,87,C3,D3,87,C3,F2,87,C 
3,2E,88,C3,55,88,C3,69,88,03,39,88, 
C3,85,88,C3,81,8C,C3,&1®@C 
1885 DATA DE,8C,C3,95,88,C03,A®,8A,C 
3,C0,89,43,55,D2,50,4C,4F ,D4,47,50, 
45,CE,47,58,41,58,45,68D83 
1886 DATA D2,58,4F,D2,46,4F,52,43,C 
5,46,52,41,40,C5,42,4F,D8,53,43,52, 
45,45,4E,B1,57,53,43,&8AEC 
1087 DATA 52,45,45,4E,B1,53,43,52,4 
5,45,4E,82,57,53,43,52,45,45,4E,B2, 
43,4F,50,59,B1,43,4F ‚68994 
1888 DATA 50,59,B2,4D,45,4E,D5,58,4 
5,CE,4C,49,4E,C5,40,4F,44,C5,49,4E, 
56,45,52,D4,57,52,49, 68BBA 
1889 DATA 54,C5,5A,4F,AF,CD,53,45,4 
C,45,43,D4,50,41,54,54,45,52,CE,50, 
42,49,C7,50,53,4D,41,60A8F 
1818 DATA AC,CC,50,53,45,D4,50,43,4 
C,45,41,D2,4C,4F ,41,04,53,41,56,C5, 
43,41,D04,40,41,47,4E ,&8AD5 
1811 DATA 49,46,D9,53,4D,41,4C,CC,5 
4,55,52,CE,46,49,4C,CC,43,4F,5@0,D9, 
43,48,41,D2,00,00,00,6B8A2A 
1812 DATA 00,88,DD,7E,80,C3,DE,BB,D 
D,7E,88,C3,E4,BB,3E,81,C3,59,BC,AF, 
C3,59,BC,CD,AC,84,E5,&8EFA 
1813 DATA D5,ES,D5,CD,C®8,BB,D1,DD,6 
E,84,DD,66,85,E5,CD,F6,BB,E1,DD,5E, 
06,DD,56,87,D5,CD,F6,8&1196 
1814 DATA BB,D1,E1,CD,F6,88B,D1,E1,C 


3,F6,BB,DD,6E,88,DD,66,801,DD,5E,04, 
DD,56,805,E5,B7,ED,52,&18F2 
1815 DATA E1,380,01,EB,E5,B7,ED,52,2 
3,23,CB,85,E5,C1,E1,C5,DD,5E,2,DD, 
56,83,E5,CD,C®8,BB,E1,861838B 
1816 DATA DD,5E,86,DD,56,87,E5,CD,F 
6,BB,E1,2B,2B,C1,88B,8B,78,B1,28,E®, 
C9,3E,C8,C3,88,BC,3E,&8DA1 
1817 DATA 48,C3,88,BC,3E,C8,CD,53,8 
B,77,C9,3E,48,CD,53,88B,77,C9,21,08, 
C8,11,00,48,18,06,21,6BABA 
1818 DATA 88,408,11,00,C0,8E,19,06,0 
8,C5,01,58,00,ED,B0,01,B80,07,09,EB, 
09,EB,C1,18,F80,C5,01,68928 
1819 DATA 58,C0,89,EB,89,EB,C1,0D,2 
0,E2,C9,21,20,6B,22,AB,95,11,93,8D, 
06,51,C5,86,87,CD,32,68AF8 
1828 DATA 82,18,FB,01,18,800,09,06,8 
7,C0,32,82,10,FB,2A,AB,95,CD,26,BC, 
22,AB,95,C1,18,E1,86,&8A7B 
1821 DATA 22,C5,86,14,CD,32,82,10,F 
B,2A,AB,95,CD,26,BC,22,AB,95,C1,10, 
EC,C9,C5, 1A,06,984,07,60B7E 
1822 DATA 87,F5,CD,42,82,F1,10,F7,1 
3,C1,C9,E6,03,E5,2A,A9,95,85,6F,3®, 
01,24,7E,E1,77,23,C9,68D63 
1823 DATA 3E,81,CD,59,BC,AF,32,CC,9 
5,DD,ES,E1,11,C2,95,801,8A,88,ED,BO, 
CD,78,84,CD,B3,83, 18,&6@DFA 
1824 DATA 85,CD,B3,83,18,14,3A,CC,9 
5,87,C2,E1,83,CD,FD,83,CD, 19,BD,86, 
00,18,FE,CD, 19,BD,CD,&8E28 
1825 DATA 24,BB,B7,28,3F,CD,89,BB,3 
0,DC,FE,8C,38,F1,21,F5,82,ES,F5,CD, 
FD,83,F1,11,09,80,21,&8DA7? 
1826 DATA 00,80,FE,F®,CA,9B,83,FE,F 
1,CA,9F,83,FE,F2,CA,AA,83,FE,F3,CA, 
AS,83,E1,FE,E®,CA,E1,613E5 
1827 DATA 83,FE,5A,CA,DD,83,FE,8D,C 
A,E1,83,C3,E3,83,F5,CD,FD,83,F1,21, 
08,00,11,00,08,CB,47,&8EDE 
1828 DATA C4,98B,83,CB,4F,C4,9F,83,C 
B,57,C4,AA,83,CB,5F,C4,A5,83,FE,2®, 
CA,DD,83,E6, 18,32,CC,81847 
1829 DATA 95,81,6D,83,C5,3A,C2,95,F 
E,03,38,24,FE,05,38,3F,20,40,E5,D5, 
CD,43,83,E1,CD,F3,83, 68091 
1838 DATA ED,5B,B3,95,19,22,BB,95,E 
1,CD,F3,83,ED,58,81,95,19,22,89,95, 
C9,E5,2A,B3,95,19,22,68EB1 
1831 DATA BB,95,2A,AF,95,19,22,87,9 
5,D1,2A,B1,95,19,22,8B9,95,2A,AD,95, 
19,22,85,95,C9,CD,24, &8CBA 
1832 DATA 83,2A,B3,95,22,BB,95,2A,B 
1,95,22,B9,95,C9,21,43,83,E5,AF,67, 
6F,B3,C8,ED,5B,CE,95,&8E87 
1833 DATA 2E,82,E6,88,C8,EB,CD,F3,8 
3,EB,C3,F3,83,2A,B9,95,ED,5B,BB,95, 
CD,63,84,38, 1D,2A,B5,E8FA® 
1834 DATA 95,ED,5B,B7,95,CD,63,84,3 
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0,11,21,85,95,11,AD,95,801,88,88,ED, 5,21,82,8D0,D1,86,11,7E,ES,2A,B1,95, 
B8,CD,C4,83,C03,73,82,68D4E 85,6F,38,81,24,C05,D5,68C4D 

1835 DATA CD,B3,83,18,F8,2A,BD,95,C 1855 DATA CD,EA,BB,2A,CE,95,D1,19,E 
9,2A,BD,95,C3,F3,83,ED,5B,BF,95,C9, B,C1,E1,23,18,E6,C9,DD,7E,80,47,FE, 
EB,2A,BF,95,CD,F3,83,&111E 01,21,76,8D,3E,®4,38,&8D97 

1836 DATA EB,C9,3E,82,32,80D,95,3A,C 1856 DATA 8B,21,7A,8D,3E,82,28,04,2 
E,95,32,BF,95,3E,86,32,C01,95,C9,3A, 1,7E,8D0,30,22,A9,95,32,CE,95,78,C3, 
C1,95,30,28,84,32,C1,68C1C BE,BC,DD,6E,88,2D0,26,&689Ad 

1837 DATA 95,C9,3E,88,32,8F,95,32,B 1857 DATA 88,5D,16,84,29,29,19,29,2 
D,95,C9,CD,89,8B,38,F8,C9,3E,28,18, 9,29,29,C9,3E,81,CD,2C,BC,FS,CD,E3, 
02,3E,58,F5,CD,07,83,&8D2E 85,01,86,88,C5,86,58,&68967 

1838 DATA 3E,88,CD,59,BC,F1,CD,8C,B 1858 DATA 7E,AA,77,23,18,FA,801,B8,® 
B,C3,92,84,F5,7C,2F,67,7D,2F,6F,23, ?7,89,C1,18,F8,C9,CD,E3,85,22,B3,95, 
F1,C9,ED,5B,B3,95,2A,&68E37 DD,6E,82,DD,66,903,46,6@C8F 

1839 DATA B1,95,CD,C®,BB,ED,5B,Ar,9 1859 DATA 23,5E,23,56,EB,C5,ES,CD,® 
5,2A,AD,95,3A,C2,95,87,28,20,30,28, 9,8B9,7E,CD,AS,BB,CD,86,B9,EB,2A,B3, 
8B,3D,CA,F6,BB,3D,28,&68DB® 95,E5,86,88,C5,CD,32,&8E69 

1848 DATA 04,30,CA,F6,BB,D5,ED,58,8 1®6® DATA 82,81,FC,07,89,C1,18,F5,E 
3,95,E5,CD,F6,8B,E1,01,D5,CD,F6,8B, 1,23,23,23,23,22,83,95,E1,23,C1,1®, 
D1,2A,8B1,95,E5,CD,F6,61372 D5,C9,CD,AC,84,ED,53,&8CDC 

1841 DATA BB,E1,ED,58,8B3,95,C3,F6,B 1861 DATA B3,95,22,B1,95,CD,AF,81,C 
B,21,88,08,11,008,88,E5,D5,CD,C3,88B, D,B4,81,11,88,48,86,19,C5,D5,86,5®, 
21,F8,FF,D1,D5,CD,F9,861858B ED,5B,83,95,21,8®,3F ,6&8CAF 

1842 DATA BB,E1,E3,11,F8,FF,CD,C3,B 1862 DATA BE,81,8D0,28,13,3A,CE,95,4 
B,E1,11,18,88,C3,F9,BB,8B7,CB,7C,ce, F,D5,C5,ES,2A,81,95,CD,F8,BB,CD,2C, 
CB,7A,C8,D5,11,8F,81,61884 BC,E1,C1,01,13,77,23,68077 

1843 DATA ED,52,E1,D@,11,7F,82,ED,5 1863 DATA 18,E5,2A,B1,95,2B,2B,22,B 
2,C9,21,C4,95,11,AD,95,86,84,0D5,5E, 1,95,D1,06,88,C5,81,58,80,21,B®,3F, 
23,56,23,1A,EB,23,4E ,E8BA6 ED,B®,81,80,07,EB,09,68A71 

1844 DATA E1,77,23,71,23,EB,18,EF,C 1864 DATA EB,C1,18,EE,21,50,C8,19,E 
9,21,AD,95,11,C4,95,06,804,7E,23,4E, B,C1,180,83,C3,BB,81,DD,7E,08,87,87, 
23,E5,EB,5E,23,56,23,6&8B75 87,87,87,21,A9,94,85,68E43 

10845 DATA EB,77,23,71,E1,18,EF,C9,D 1865 DATA 6F,380,81,24,22,D3,95,C9,C 
D,6E,88,00,66,81,DD,5E,82,00D,56,83, PD,AD,89,ED,58,03,95,21,0D5,95,06,88, 
C9,DD,7E,88,32,D8,95,&8DSC BE,84,05,3E,89,32,D2,68B95 

1846 DATA C9,CD,AC,84,3A,D8,95,FE,8 1866 DATA 95,1A,32,D1,95,C5,ES,CD,8 
3,CA,8BA,85,D6,81,DA,EA,BB,FS,CD,C8, 6,88,69,84,8E,808,3A,D2,95,3D,32,D2, 
BB,21,ED,BB,22,88,85,&618CA 95,3A,0D1,95,CC,28,87,&8CD1 

1847 DATA 21,88,88,E5,01,F1,CA,6D,8 1867 DATA 17,32,01,95,38,83,70,B1,4 
5,18,63,CD,AC,84,ED,53,83,95,22,B1, F,CB,00,18,E6,3A,A2,89,A1,47,3A,A3, 
95,86,84,0D,23, 18,FC,68082 89,EE,FF,B1,EE,FF,B®,68E18B 

1848 DATA CD,AC,84,ED,53,AF,95,22,A 1868 DATA E1,77,23,C1,8D,28,C8,D1,1 
D,95,3A,D8,95,06,81,38,@0F ,21,1A,85, 3,13,13,13,18,85,C9,3E,88,32,0D2,95, 
22,88,85,21,80,08,E5,68897 13,1A,C9,CD,C8,86,21,&68AED 

1849 DATA D1,28,5A,18,33,21,88,08,E 1869 DATA D5,95,22,83,95,21,80,48, 1 
5,0D1,E5,D5,E5,2A,B3,95,19,E3,ED,5B, 1,88,C8,8E,88,806,84,E5,2A,B3,95,7E, 
B1,95,19,D1,ED,53,B3,68DED 23,22,83,95,E1,C5,4F,&6BA7D 

1858 DATA 95,22,81,95,CD,C8,BB,D1,2 1878 DATA 86,19,C5,86,14,1A,AE,A1,B 
A,AF,95,19,E3,ED,58,AD,95,19,D1,ED, 6,12,23,23,23,23,13,13,13,13,18,F1, 
53,AF,95,22,AD,95,03,&68F9F C1,18,E8B,81,31,F8,EB,688D9 

1851 DATA F6,BB,CD,60,85,2A,CE,95,C 1871 DATA 89,EB,89,C1,18,03,C5,81,F 
D,F3,83,EB,21,FA,FF,ES,D5,CD,60,85, C,87,EB,89,EB,89,C1,80,28,C5,C9,3E, 
2A,CE,95,E5,01,29,19,61143 081,CD,2C,BC,32,83,95,&68C3C 

1852 DATA CD,F3,83,EB,21,82,88,CD,6 1872 DATA 11,88,48,2A,D3,95,06,88,C 
D,85,D1,E1,CD,87,85,21,02,08,11,088, 5,E5,D5,11,B8,3F,8E,28,7E,E5,2E,88, 
088,05,E5,CD,87,85,21,68C83 17,38,06,F5,3A,B3,95,&68AB3 

1853 DATA FE,FF,ED,5B,CE,95,CD,87,8 1873 DATA 18,82,F5,AF,F5,3A,CE,95,4 
5,E1,D1,C3,1A,85,3A,CE,95,87,87,87, 7,F1,12,13,8D,18,FB,F1,2D,28,E6,E1, 
E5S,6F,26,80,CD,F3,83,61884 23,AF,B1,28,DC,D1,86,68D28 

1854 DATA 19,E3,11,F2,FF,19,22,81,9 1@74 DATA 808,C5,81,28,88,21,B8,3F,E » 
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D,B8,21,E0,87,19,EB,C1,18,EF,21,58, 
C8, 19,EB,E1,23,23,23,E&B8AE6 
1875 DATA 23,C1,18,8B3,C9,CD,C8,86,D 
D,6E,00,0D,66,01,11,05,95,06,88,C5, 
E5,801,04,08,EB,ED,B®,&8CDA 
1876 DATA EB,E1,CD,26,BC,C1,18,F8,C 
9,ED,5B,D3,95,DD,6E,88,26,80,29,29, 
19,E5,DD,7E,82,F5, IF ,&8DE7 
1877 DATA 1F,1F,E6,83,85,6F,30,81,2 
4,F1,E6,07,47,04,AF,37,1F,1@,FD,AE, 
77,CD,11,BC,E1,7E,23,&8AEC 
1878 DATA 38,07,C0,46,23,77,23,70,C 
9,77,23,77,23,77,C9,2A,D3,95,86,2®, 
36,00,23,18,FB,C9,11,6@89A5 
1879 DATA 08,38,C3,9B,BC,DD,6E,@8,D 
D,66,81,E5,DD,E1,DD,46,88,DD,6E,®1, 
DD,66,802,11,08,38,C9,&68C4A 
1868 DATA DD,6E,82,0D,66,83,E5,CD,3 
F,88,CD,77,BC,E1,CD,83,BC,C3,7A,BC, 
DD,6E,82,0D,66,83,E5,&8F6A 
1881 DATA CD,3F,88,CD,8C,BC,E1,11,® 
0,40,61,08,00,3E,82,CD,98,BC,C3,8F, 
BC,C9,CD,11,BC,01,AA,&68C59 
1882 DATA ®01,D8,01,88,83,C8,01,80,8 
7,C9,CD,AD,89,CD,AC,84,FD,21,A1,89, 
DD,21,00,48,FD,36,83,60C3A 
1883 DATA 91,E5,DS,CD,F®,BB,CD,2C,B 
C,FD,77,82,FD,BE,81,01,E1,C8,CD,34, 
8A,CD,11,BC,01,3F,01,&68EFA 
10884 DATA 28,88,01,7F,02,30,03,01,9 
F,00,ED,43,AB,89,FD,36,04,88,FD,36, 
05,08,7D,FE,C8,30,7F ,&6094A 
1885 DATA FD,75,88,D5,CD,1D,BC,D1,C 
D,98,89,20,72,1B,CB,01,380,85,2B,CB, 
7A,208,85,CD,9B,89,28,&68C0B 
1886 DATA F1,13,CB,809,38,81,23,ES,E 
5,CD,29,BC,22,A7,89,E1,CD,26,BC,22, 
A9,89,E1,FD,46,88,7E,&8D88 
1887 DATA FD,AE,81,B1,A9,FD,AE,®1,7 
7,E5,2A,A7,89,84,3A,A5,89,CD,73,89, 
32,A5,89,85,85,2A,A9, &8CDA 
1888 DATA 89,3A,A6,89,CD,73,89,32,A 
6,89,84,E1,CB,89,38,18,E5,2A,A7,89, 
23,22,A7,89,2A,A9,89,&8C2D 
1889 DATA 23,22,A9,89,2A,AB,89,ED,5 
2,E1,38,07,23,13,CD,98,89,28,8B6,DD, 
6E,00,26,88,DD,5E,®81,&BAE6 
1898 DATA DD,56,82,FD,35,83,C8,DD,2 
3,D0,23,0D,23,C3,CF,88,F5,CD,9B,89, 
E3,7C,E1,28,02,AF,C9,&8F14 
1891 DATA B?,3E,FF,C®,FD,34,83,28, 1 
0,DD,28,DD,28,DD,2B,DD,78,88,00,73, 
081,00,72,02,C9,FD,35,&8D22 
1892 DATA 83,C9,7E,FD,AE,82,A1,C9,® 
0,00,00,00,00,00,00,08,00,800,08,08, 
CD,E1,BB,CD,2C,BC,32,&88B1 
1893 DATA A2,89,CD,E7,BB,CD,2C,BC,3 
2,A3,89,C9,DD,6E,88,DD,66,81,22,CA, 
95,36,00,23,36,@00,DD,&BCF2 
1894 DATA 23,00,23,CD,AC,84,22,B1,9 


5,ED,53,83,95,DD,7E,84,D6,28,D08,21, 
11,97,28,8A,47,7E,87,68C84 
1895 DATA 3C,23,3D,28,FC,18,F7,7E,2 
3,B7,C8,47,C5,7E,23,E5,2A,B1,95,ED, 
58,83,95,CD,1F,8A,E3,&8DCA 
1896 DATA 7E,23,E3,CD,1F,8A,2A,CE,9 
5,E5,19,22,B3,95,2A,CA,95,7E,D1,83, 
77,E1,C1,18,D8,C9,86,&8E1A 
1897 DATA 88,17,38,8B,E5,D5,C5,F5,C 
D,EA,BB,F1,C1,D1,E1,23,23,18,EE,C9, 
CB,3C,CB,1D,CD, 11,BC,&8F3A 
1898 DATA 28,85,D8,CB,3A,CB,1B,CB,3 
A,CB,1B,C9,2A,B1,95,E0,5B,83,95,CD, 
1D,BC,7C,DD,86,88,67,&8D88 
1899 DATA 22,F5,95,79,32,F7,95,2A,A 
0,95,ED,5B,AF,95,CD,1D,BC,22,F8,95, 
79,32,FA,95,ED,4B,FA,&8F9C 
1188 DATA 95,05,2A,F5,95,3A,F7,95,E 
5,4F,CD,84,96,22,F5,95,E1,CD,E5,BD, 
CD,2C,BC,47,3A,FA,95,61838 
1181 DATA AF,2A,F8,95,7E,A8,B1,A9,A 
8,77,CD,84,96,22,F8,95,C1,18,D3,C9, 
CD,86,8B9,21,FC,95,CD,&8F33 
11082 DATA 3A,8B,21,AD,95,CD,3A,8B,2 
1,81,95,CD,3A,8B,3A,AD,95,21,81,95, 
96,3C,32,FB,95, 11,FC,&8D37 
1183 DATA 95,1A,96,38,15,3A,AD,95,7 
7,3A,FB,95,3D,EB,86,32,AD,95,21,26, 
BC,22,05,96,18,BA, 1A,6BA6D 
1184 DATA 32,AD,95,21,29,BC,22,05,9 
6,2A,AF,95,E0,5B,8B3,95,87,ED,52,E5, 
2A,FE,95,ED,52,38,18,&@D5C 
1185 DATA 2A,AF,95,22,B3,95,E1,ES,E 
D,5B,FE,95,19,22,AF,95,3E,2B,2B,32, 
07,96, 18,8C,2A,FE,95,&8C3C 
1186 DATA 22,AF,95,3E,23,23,32,87,9 
6,E1,E5,CD,47,8A,2A,83,95,CD,87,96, 
22,83,95,2A,AF,95,CD,&8C9E 
1187 DATA 87,96,22,AF,95,E1,2B,CB,? 
C,28,E4,C9,E5,CD,AC,84,D0,23,0D,23, 
DD,23,DD,23,CD,34,8A,&8E98 
1188 DATA E3,C1,71,23,70,23,73,23,7 
2,C9,F5,C5,8E,88,CD,8F,B9,3A,82,C®, 
6F,78,CD,8C,B9,AF,BS,&8CD2 
1189 DATA 21,CB,B1,28,83,21,C6,B7,C 
1,F1,C9,CD,1D,BC,CD,ES,BD,32,A2,89, 
C9,CD,2C,BC,F5,CD, 1D,&8FB8 
1118 DATA BC,D1,42,C3,E8,BD,CD,88,8 
C,ED,4B,FF,95,84,3A,FC,95,32,81,95, 
3A,AD,95,32,83,95,C5,68F69 
1111 DATA ED,S5B,AF,95,2A,B3,95,26,® 
0,E5S,CD,6F,8B,E1,CD,88,96,22,B3,95, 
ED,5B,FE,95,2A,B1,95,68ED4 
1112 DATA 26,88,CD,00,8C,E5,CD,88,9 
6,CD,88,8C,E3,CD,89,96,CD,88,8C,E1, 
CD,88,8C,CD,8B,96,22,&8C9D 
1113 DATA B1,95,C1,18,C4,ED,5B,FE,9 
5,CD,89,96,CD,89,96,ED,53,FE,95,ED, 
5B,AF,95,CD,89,96,ED,&1846 
1114 DATA 53,AF,95,2A,82,96,11,81,8 
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0,8B7,ED,52,22,82,96,7C,E6,80,28,89, 5,46,4C,AA,C4,24,25,26,18,12,2A,B2, 
C9,3A,A2,89,E5,DS,CD,&8C63 8B,26,77,46,48,AA,A4,&88BC 

1115 DATA 79,8B,D1,E1,C9,CD,86,8B9,D 1135 DATA 24,25,24,18,12,2A,A2,89,2 
D,6E,04,DD,66,85,DD,5E,86,DD,56,07, 5,55,46,48,4A,A4,27,75,77,18,13,AA, 
CD,34,8A,ED,53,8B3,95, &0E38 BA,8B,25,55,76,48, 00, &883F 

1116 DATA 22,B1,95,CD,AC,84,CD,34,8 1136 DATA 88,20,808,88,18,10,00,80,8 
A,ED,53,AF,95,22,AD,95,3A,B1,95,47, 68,800,08,06,40,00,00,28,00,88,18,1®, 
95,308,8E,7D,98,32,88,&8CB1 00,00,08,00,08,06,48,&6812C 

1117 DATA 96,85,3C,32,FC,95,3E,2B,1 1137 DATA 88,00,28,80,88,18,18,88,8 
8,0C,32,00,96,47,70,98,3D,32,FC,95, 0®,88,08,80,06,48,08,00,20,01,88,98, 
3E,23,32,80B,96,2A,B3,&89D4 10,00,00,08,04,00,806,68181 

1118 DATA 95,ED,52,30,15,2A,B3,95,E 1138 DATA 40,28,88,20,82,01,18,10,0 
B,87,E5,ED,52,22,82,96,01,19,23,22, 3,FC,88,02,08,06,48,18,00,20,04,02, 
FE,95,3E,1B,18,8C,22,&8B6C 18,12,04,88,08,01,10,&@28F 

1119 DATA 82,96,EB,ED,52,2B,22,FE,9 1139 DATA 86,480,84,00,28,808,04,18,1 
5,3E,13,32,09,96,C9,CD,@8B,8C,3A,08, 1,88,10,88,08,AB,06,40,08,80,20,18, 
96,3C,CB,3F,C8,F5,2A,&8BEE 08,18,10,90,20,08,81,&6833E 

1128 DATA AD,95,22,FC,95,C1,C5,ED,4 1148 DATA C0,06,44,88,00,20,20, 18,1 
B,02,96,03,CB,81,ED,5B,AF,95,ED,53, 8,18,480,40,08,0E,40,06,40,00,00,20, 
FE,95,E5,D5,C5,CD,6F ,&10B4 40,20,18,10,20,80,08,&83EE 

1121 DATA 8B,2A,FC,95,ED,5B,FE,95,C 1141 DATA 78,C0,06,48,00,00,20,80,4 
D,03,8C,CD,89,96,ED,53,FE,95,C1,D1, ®,18,18,11,00,08,80,C8,06,40,84,40, 
CD,89,96,CD,89,96,E1,81887 21,00,80,18,18,80A,88,6&8537 

1122 DATA 8B,0B,78,B1,28,DA,CD,85,9 1142 DATA 88,81,48,06,41,80,08,22,8 
6,CD,8B,96,EB,2A,FC,95,CD,88B,96,22, 1,08,18,180,04,00,88,01,48,06,40,00, 
FC,95,EB,C1,18,B6,C9,&8E17 00,24,02,08,18,10,00,681C4 

1123 DATA CD,0B,8C,3A,82,96,4F,3C,C 1143 DATA 080,08,02,48,86,40,80,88,2 
B,3F,C8,47,2A,B3,95,22,FE,95,E5S,2A, ®,88,88,18,10,00,00,08,02,00,06,48, 
AF,95,22,BB,95,ES,2A,68CD5 00,88,20,88,80,18,18,68178 

1124 DATA B1,95,22,FC,95,ES,2A,AD,9 1144 DATA 08,08,88,84,80,06,48,00,0 
5,22,89,95,E5,C5,2A,B1,95,ED,5B,FE, ®,20,80,88,18,10,00,00,08,04,00,06, 
95,E5,D5,CD,65,8D,13,&1838B 48,00,00,20,80,88,18,60124 

1125 DATA ED,53,FE,95,ED,5B,AF,95,2 1145 DATA 18,88,08,08,80,08,06,48,8 
A,FC,95,C0,65,80,23,22,FC,95,2A,AD, 0®,08,20,800,00,18,18,00,00,808,00,08, 
95,ED,5B,BB,95,CD,65,6@FE5 86,7F,FF,FF,FF,FF,FF,E862E 

1126 DATA 8D, 1B,ED,53,BB,95,ED,5B,B 1146 DATA FB,1iF,FF,FF,FF,FF,FF,FE,4 
3,95,2A,B9,95,CD,65,80,2B,22,89,95, ®,80,08,20,00,808,18,18,00,08,88,00, 
D1,E1,CD,65,80,8D,28,68E38 00,06,40,00,80,20,00,68806 

1127 DATA BC,C1,80,00,E1,2B,22,AD,9 1147 DATA 80,18,10,00,88,08,88,88,8 
5,E1,23,22,81,95,E1,2B,22,AF,95,E1, 6,58,95,58B,A8,73,A8,18,12,83,89,8B, 
23,22,83,95,18,86,C9,&8CB2 6A,EB,36,55,55,D2,AB, &8981 

1128 DATA 3A,A2,89,C5,F5,E5,D5,CD,6 1148 DATA 2A,A8,18,12,AA,12,0A,4A,8 
F,88,D1,E1,F1,CD,83,8C,C1,08,40,68, A,A6,59,DD,5A,AB,32,98,18,13,33,11, 
C8,80,38,C8,F0,88,8F ,EBECF OB,4E,CB,36,55,55,52,6@8F3 

1129 DATA FO,FF,180,808,18,02,0C,12,1 1149 DATA A®,2A,AB,18,12,AA,10,89,4 
C,086,8E,16,80,8A,18,1A,04,14,0C,08, A,BA,A6,55,55,5A,A8,73,A8,18,12,AB, 
00,00,00,80,88,00,88,&82DD BB,@0B,6A,EB,36,48,88,&B8A7E 

1138 DATA 80,00,00,00,00,00,008,088,8 1158 DATA 00,20,88,80,18,10,00,00,® 
0,008,00,00,08,00,80,008,008,00,08,08, 68,00,00,86,48,008,08,28,08,08,18,1®, 
ıF,FF,FF,FF,FF,FF,F8,68612 00,00,08,00,00,06,48,&812C 

1131 DATA 87,FF,FF,FF,FF,FF,FE,3F,F 1151 DATA 00,80,28,00,80,18,18,00,8 
F,FF,FF,FF,FF,F8,0F,FF,FF,FF,FF,FF, 08,08,00,00,86,4F,FF,FF,27,FF,FF,98, 
FE,?F,FF,FF,FF,FF,FF,6&617B4 18,08F,F0,08,87,F8,86,&5877C 

1132 DATA FB,1F,FF,FF,FF,FF,FF,FE,4 1152 DATA 48,80,01,27,FF,FF,98,180,7 
0,00,00,20,08,80,18,10,00,08,068,08, ®,0E,808,3F,FF,06,48,088,81,27,FF,FF, 
00,06,40,80,08,20,00,688086 98,10,80,01,88,7F,FF,&89FD 

1133 DATA 88,18,10,00,008,88,08,08,8 1153 DATA 86,48,88,81,27,FF,FF,98, 1 
6,4C,AE,AE,24,77,77,18,12,2E,BB,8B, 1,88,88,88,FF,FF,C6,48,008,81,27,FF, 
76,25,46,4A,AA,A4,24,6872B FF,98,12,008,00,49,FF,68B49 

1134 DATA 25,24,18,12,2A,A2,8A,25,5 1154 DATA FF,E6,48,88,81,27,FF,FF,939 
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8,12,00,00,49,FF,FF,E6,48,80,81,27, 
FF,FF,98,12,00,800,49,&68B8B 
1155 DATA FF,FF,E6,48,80,81,27,FF,F 
F,98,12,00,80,49,FF,FF,E6,48,88,01, 
27,FF,FF,98,12,00,80,68C41 
1156 DATA 49,FF,FF,E6,48,08,01,27,F 
F,FF,98,11,00,00,88,FF,FF,C6,48,08, 
01,27,FF,FF,98,10,80,68D26 
1157 DATA 01,88,7F,FF,86,48,88,81,2 
7,FF,FF,98,18,70,80E,08,3F,FF,86,4F, 
FF,FF,27,FF,FF,98,10,68C07 
1158 DATA 8F,F®,88,87,F8,86,40,80,8 
0,20,00,00,18,10,00,00,08,00,00,086, 
40,00,00,20,08,80,18,6831A 
1159 DATA 10,08,080,08,80,08,06,48,8 
0,00,20,00,00,18,18,00,08,88,08,088, 
06,7F,FF,FF,FF,FF,FF,E862E 
1160 DATA FB,1iF,FF,FF,FF,FF,FF,FE,A 
0,00,00,20,00,800,18,18,00,00,88,8®, 
00,06,40,08,00,20,800,68806 
1161 DATA 08, 18,180,00,00,88,08,08,08 
6,46,EE,EE,2A,AD,DD,98, 11,5D,97,0B, 
AA,AE,E6,48,44,84,2E ,688D8 
1162 DATA A8,91,58,11,55,54,0A,02,4 
8,A6,44,44,C4,2A,AC,99,98,11,95,96, 
OB,2A,AC,A6,42,44,84,60A05 
1163 DATA 2A,A4,91,58, 11,55, 14,0A,2 
A,48,A6,4C,4E,84,2A,EC,90,58,11,5D, 
17,0A,3B,6E,A6,40,00,6089A 
1164 DATA @0,28,80,08,18,18,00,00,8 
8,00,00,06,48,08,00,20,08,80,18,18, 
00,00,08,00,00,06,48,&812C 
1165 DATA 00,00,28,00,08,18,180,08,® 
0,08,08,00,06,40,08,00,28,00,00,18, 
108,40,02,08,07,80,06,6&01B5 
1166 DATA 40,08,08,28,1F,F8,18,10,E 
0,07,08,08,40,86,48,00,08,20,18,08, 
18, 10,E0,07,88, 10,20,6849B 
1167 DATA 86,40,08,08,20, 10,808, 18,1 
0,408,82,08,13,A1,06,40,80,08,28, 10, 
08,18,11,580,4A,88, 1F,E840C 
1168 DATA E3,86,48,00,00,20,18,08, 1 
8,10,E7,E7,88,1B,A6,06,40,08,88,28, 
18,08,18,18,40,42,08,60558 
1169 DATA 18,2C,06,490,00,80,28,10,0® 
8,18,10,40,82,08,08,38,06,40,00,00, 
28,10,08,18,10,A0,05,6833F 
11708 DATA 08,08,30,86,40,00,80,28,1 
0,08,18,10,A0,805,08,08,30,06,48,0®, 
08,20,1F,F8,18,11,10,60381 
1171 DATA 08,88,08,20,86,48,080,08,2 
0,00,00,18,11,18,08,88,88,28,06,40, 
08,00,20,08,08,18,08,69828D 
1172 DATA 80,08,08,00,80,180,00,008,8 
8,07,C0,06,408,00,00,28,08,80,18,08, 
00,00,00,08,08,18,80,&816D 
1173 DATA 00,88,08,00,06,40,80,08,2 
0,80,08,18,FF,FF,FF,FF,FF,FF,D®,08, 
08,08,00,00,06,48,08,6879E 
1174 DATA 00,28,08,88,19,FF,FF,FF,F 


F,FF,FF,D®,00,08,08,00,08,06,7F,FF, 
FF,FF,FF,FF,FB,FF,FF,E8F84 
1175 DATA FF,FF,FF,FF,DF,FF,FF,FF,F 
F,FF,FE,40,00,80,28,00,80,1A,00,08, 
01,00,08,08,08,08,88,&8C1F 
1176 DATA 88,00,00,86,48,00,80,28,8 
0,00, 1A,00,00,01,08,00,08,D0,08,08, 
08,00,80,06,43,9C,D4,6831A 
1177 DATA 29,5B,56,FA,E4,CC,DD,5D,5 
D,8C,D®,8A,CE,88,08,08,806,41,49,14, 
28,12,54,BA,8A,AA, 95, 68B8C 
1178 DATA 55,51,50,D8,8A,A8,88,3F,® 
0,06,41,48,98,29,DA,76,BA,CE,CC,D5, 
55,59,88,D8,8A,CC,88,&8C6C 
1179 DATA 7F,00,06,41,48,54,29,4A,5 
4,BA,8A,AA,95,54,91,44,D8,8A,88,08, 
7F,00,86,43,90,94,2D,&89E5 
118@ DATA DB,56,BA,8A,AC,D5,54,90,5 
8,08,EE,8E,88,FF,08,06,48,00,08,2®, 
08,00,1A,88,00,01,00,68913 
1181 DATA 88,80,D0,80,00,88,FF,00,8 
6,48,00,08,22,08,802,1A,800,FC,81,08, 
08,00,D00,08,08,08,C8,684F®8 
1182 DATA 80,806,48,3F,80,21,080,84,1 
A,00,84,01,80,01,FC,D8,80,08,08,C®, 
08,06,40,28,80,28,808,685E4 
1183 DATA 88, 1A,80,B4,801,84,81,DC,D 
0,00,00,08,FF,7E,86,40,20,80,20,40, 
18, 1A,00,FC,81,0E,01,60689 
1184 DATA 8C,D0,06,08,08,FF,7F,86,4 
0,20,80,20,20,28,1A,808,FC,01,0E,01, 
8C,D8,09,08,08,7F,7F ,&87BF 
1185 DATA 06,48,28,88,20,10,40,1A,0 
0,84,01,04,09,DC,D®, 18,80,88,7F,7F, 
86,48,3F,80,28,08,80,687A1 
1186 DATA 1A,80,84,01,15,85,54,D8, 1 
0,88,08,3F,7F,86,48,3B,80,20,85,08, 
1A,800,B4,01,8E,7F ,8C,686C1 
1187 DATA D8,10,80,08,00,01,86,48,3 
B,88,20,02,00,1A,08,DC,81,04,05,DC, 
D0,09,80,08,08,01,86,686D8 
1188 DATA 40,3F,80,20,85,00,1A,00,E 
C,01,84,89,D0C,D8,97,C0,08,88,7F,86, 
40,3F,80,20,808,88, 1A,&68779 
1189 DATA 88,B4,01,0A,801,AC,D®,08,6 
0,08,00,7F,86,40,3B,80,28, 10,48, 1A, 
00,84,01,0A,01,AC,D®,6873A 
1198 DATA 00,30,08,00,7F,06,48,3B,8 
0,20,20,20,1A,00,84,01,11,01,74,D®, 
00,18,08,08,7F,06,40,68522 
1191 DATA 3B,80,20,40,18,1A,00,CC,® 
1,11,81,74,D00,00,08,08,00,7E,06,40, 
2A,80,20,88,08, 1A,00,605Ad 
1192 DATA CC,81,80,81,FC,D0,00,00,8 
8,00,00,06,48,3F,80,21,08,04,1A,08, 
B4,01,08,00,08,08,00,&6856B 
1193 DATA 80,88,08,00,06,48,37,88,2 
2,08,02,1A,00,84,01,08,08,00,08,08, 
00,08,00,08,06,408,80,682E6 
1194 DATA 80,20,80,80,12,80,FC,81,8 
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0,00,00,90,80,00,08,08,80,04,7F,FF, 0,00,00,80,00,80,00,00,00,00,00,08, 
FF,FF,FF,FF,E3,FF,FF,&68A26 00,00,00,00,00,80,80,&0008 

1195 DATA FF,FF,FF,FF,IF,FF,FF,FF,F 1215 DATA 80,08,08,00,00,00,00,00,® 
F,FF,F8,00,00,00,00,00,00,08,08,00, 0,00,00,00,08,80,00,00,00,08,08,08, 
00,00,00,00,00,00,08,&6BABE 00,00,00,00,08,00,80,&0088 

1196 DATA 00,08,00,08,80,08,80,08,8 1216 DATA 08,80,08,00,00,880,00,00,0 
0,00,00,00,08,00,00,00,00,00,00,08, 0,00,00,00,00,00,08,08,00,00,00,00, 
00,00,00,800,AA,AA,AA,&EBIFE 00,00,00,00,00,80,00,&60008 

1197 DATA AA,55,55,55,55,AA,AA,AA,A 1217 DATA 00,00,808,88,08,88,00,00,8 
A,55,55,55,55,AA,AA,AA,AA,55,55,55, 0®,88,00,00,00,00,00,00,00,88,08,00, 
55,AA,AA,AA,AA,55,55,6@8D48 00,00,00,00,00,00,00,60888 

1198 DATA 55,55,11,11,11,11,22,22,2 1218 DATA 88,00,00,00,00,88,00,00,0 
2,22,44,44,44,44,88,88,88,88,11,11, 0,80,00,00,00,00,00,00,08,08,88,08, 
11,11,22,22,22,22,44,685B6 00,00,00,80,08,00,00,&90088 

1199 DATA 44,44,44,88,88,88,88,88,8 1219 DATA 00,00,00,00,88,88,00,08,8 
8,88,88,00,00,80,00,22,22,22,22,08, 6®,00,00,00,00,00,008,08,08,00,02,05, 
00,00,00,88,88,88,88,607B4 00,00,00,00,80,80,00,60887 

1288 DATA 08,00,008,00,22,22,22,22,8 1228 DATA 88,00,88,84,1B,F®,1B,F8,8 
0,00,00,00,40,48,40,A0,FF,FF,FF,FF, 68,00,08,00,05,00,70,08,00,00,70,00, 
04,04,04,04,04,04,04,685AB 00,00,00,8A,01,00,07,60311 

1201 DATA 04,04,04,04,804,FF,FF,FF,F 1221 DATA 28,801,E0,01,38,87,28,81,E 
F,40,40,40,40,48,40,40,40,03,03,083, ®,901,38,08,20,00,00,08,80,07,08,E®, 
03,81,81,81,81,C0C3,C3,&@89A6 11,00,3F,F8,17,18,8E,&85D7 

1282 DATA C3,C3,66,66,66,66,3C,3C,3 1222 DATA 28,00,08,88,00,8B,00,38,8 
C,3C,18,18,18,18,8C,0C,8C,0C,086,06, 0,48,18,48,06,38,801,88,8C,68, 12,18, 
06,86,3E,3E,3E,3E,7C,86862A 12,00,0C,00,00,08,80,&6827E 

1283 DATA 7C,7C,7C,98,98,98,98,89,8 1223 DATA 89,80A,80F,68,1F,F®, 10,98, 1 
9,89,89,C7,C7,C7,C7,E3,E3,E3,E3,91, 60,18,1F,780,0F,68,01,00,88,C0,00,08, 
91,91,91,19,19,19,19,60F48 00,00,05,88,408,00,28,6046C 

1284 DATA 5A,5A,5A,5A,BD,BD,BD,BD,6 1224 DATA 88,18,08,80,00,00,05,08F,E 
6,66,66,66,DB,DB,DB,DB,DB,DB,DB,DB, ®,1F,F®,20,08,00,00,08,00,05,28,08, 
66,66,66,66,BD,BD,BD,&189B ıF,F8,8F,E8,80,00,00,60466 

1285 DATA BD,5A,5A,5A,5A,1C,1C,1C,ı 1225 DATA 80,07,08,A0,008,40,01,F8,8 
C,32,32,32,32,79,79,79,79,7F,7F,7F, 0,40,00,A0,800,00,00,008,07,01,00,01, 
7F,7F,7F,?7F,?7F,3E,3E,6809B5 08,07,C0,81,08,01,00,6@38A 

1286 DATA 3E,3E,1C,1C,1C,1C,008,88,8 1226 DATA 00,88,00,08,04,58,80,38,® 
0,00,00,00,00,00,00,00,00,00,008,008, ®,00,08,08,08,87,81,00,01,00,01,08, 
00,00,00,00,80,80,80,&B88EC 081,00,81,00,00,00,900,600A8 

1287 DATA 80,00,00,00,00,00,008,088,8 1227 DATA 88,04,18,80,18,08,00,80,8 
0,08,00,008,00,00,00,00,08,00,008,068, 0,88,07,18,00,06,80,01,88,00,60,08, 
02,00,008,008,008,A9,94,6013F 18,00,00,08,00,08,0F ,68169 

1288 DATA 80,00,00,00,00,08,008,08,8 1228 DATA E®,1F,F®,18,18,18,18,1F,F 
0,00,00,00,00,00,08,00,00,00,008,008, PB,8F,E®,80,00,008,00,05,88,20,1F,F®, 
00,00,00,00,00,00,00,68008 ıF,F0,08,80,00,00,08,68678 

1289 DATA 80,08,00,00,80,08,008,088,8 1229 DATA 18,28,1C,18,16,18,13,108,1 
0,00,08,C8,00,00,80,00,00,800,08,008, 1,F®,18,E8,00,00,00,00,08,88,10,1®, 
C3,26,BC,80,C9,80,C9,&683FF 98,18,D8,18,F8,1F,B®d,6868D 

1218 DATA 00,C9,00,00,80,008,08,808,8 1238 DATA 8F,18,00,80,80,008,09,03,08 
0,008,00,00,00,00,00,08,00,008,08,08, 98,82,80,02,40,82,28,1F,F®,1F,F®,82, 
08,00,00,00,00,00,00,608C9 00,00,00,80,00,88,08,68341 

1211 DATA 88,00,08,80,008,00,008,08,8 1231 DATA F®@,18,F®,18,90,180,980,1F,9 
0,00,00,00,08,00,00,00,08,00,08,08, 0®,08F,ı0,00,008,88,88,08,0F,C0,1F,E®, 
00,00,00,00,80,80,00,60888 18,B8, 10,98, 1F,90,8F ,6087F2 

1212 DATA 80,00,808,00,00,808,008,88,8 1232 DATA 88,88,00,08,00,88,00, 10,8 
08,00,00,00,08,00,00,00,08,08,8008,008, 98,18,1E,18,1F,18,81,F0,00,F0,00,00, 
00,00,00,80,00,00,808,68808 00,80,88,8E,E®,1F,F0,6846B 

1213 DATA 80,00,88,80,808,00,808,88,8 1233 DATA 11,18,11,18,1F,F8,8E,E8,8 
0,00,00,00,00,08,00,00,08,008,00,08, ®,08,80,00,88,81,E8,13,F®,12,10,1A, 
00,00,00,00,00,80,808,60888 108,0F,F0,07,E8,80,80,6865D 

1214 DATA 80,80,00,00,80,80,00,808,8 1234 DATA 00,88,04,18,C8,18,C0,00,0 39 
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0,00,00,04,58,C0,38,C0,00,80,88,00, 
07,01,08,03,88,06,C8,68519 
1235 DATA 8C,60,08,20,08,80,08,08,® 
7,02,80,02,80,02,80,02,80,02,88,08, 
08,08,00,07,08,20,8C,68368 
1236 DATA 680,86,C8,03,88,81,08,00,8 
0,00,00,08,00,208,88,19,1B,18,1B,98, 
08,F0,00,60,08,08,00,68488 
1237 DATA 08,87,23,B8,46,68,4C,C8,5 
9,88,37,10,00,008,80,08,88,1F,E®,1iF, 
F8,01,18,01,18,1F,F@0,68788B 
1238 DATA 1F,E®,80,08,00,88,88, 1F,F 
8,1F,F®,11,10,11,18,1F,F0,8E,E®,08, 
00,00,00,08,8F ,Ed, 1F,&6867A 
1239 DATA F®,18,18,18,18,10,18,08,2 
0,008,08,00,808,88,1F,F®,1F,F®,18,18, 
18,10,1F,F®,0F,E®,88,&85DC 
1248 DATA 008,800,88,07,1F,F®,1F,F®,1 
1,18,11,18,10,10,00,00,08,88,07,1F, 
FO,1IF,F®,01,18,801,18,&84CE 
1241 DATA 08, 10,08,08,00,88,08,@F,E 
8,1F,F®,180,18,11,18,1F,10,0F,28,08, 
08,00,00,88,1F,F@,1F,&683EB 
1242 DATA FO,801,08,81,08,1F,F@,1F,F 
0,00,00,08,008,84,1F,F8,1F,F0,808,08, 
00,08,08,8E,08,1E,00,60566 
1243 DATA 190,80,18,88,1F,F®,8F,F®,0 
0,00,00,008,09,1F,F®,1F,F8,83,88,06, 
C8,0C,68, 18,38, 10, 18,608672 
1244 DATA 80,80,800,00,87,1F,F®,1F,F 
0,10,00,10,08,10,00,00,00,80,08,0C, 
ıF,F0,80,E8,01,C0,03,68514 
1245 DATA 88,87,08,03,00,81,80,08,C 
8,1F,E®,1F,F0,00,08,00,80,89,1F,F®, 
08,E8,01,C8,03,80,87,6871C 
1246 DATA 808,8E,88,1F,F0,80,08,08,8 
0,08,8F,E®,1F,F®,18,18,18,18,1F,F®, 
OF,E8,00,00,00,00,808,68569 
1247 DATA IF,F@,1F,F8,801,180,01,180,0® 
1,F0,00,E0,00,00,08,08,08,0F,E®,1F, 
F8,10,18,18,18,3F,F0,68786 
1248 DATA 2F,E®,00,00,80,08,88,1F,F 
8,1F,F®,801,18,81,18,1F,F®,1E,E®,08, 
08,08,08,07,08,E8,11,68664 
1249 DATA F®,13,98,1F,180,8E,28,08,8 
0,00,00,08,00,10,08,18,1F,F®,1F,F®, 
08,18,008,18,00,00,80,68456 
1258 DATA @8,88,0F,F®,1F,F8,180,88,1 
0,808,1F,F0,0F,F®,08,08,00,80,08,1F, 
Fa,1F,F®,18,00,18,08,6868A 
1251 DATA 8F,F®,87,F0,80,80,08,00,8 
C,iF,F@,1F,F®,18,08,18,808,1F,F®,1F, 
F8,10,800,18,08,0F,F8,68770 
1252 DATA 87,F8,08,00,80,88,08, 1E,F 
0,1F,F8,01,00,01,08,1F,F8,1E,F®,08, 
08,00,00,08,08,F0,01,68634 
1253 DATA F@,1F,88,1F,80,81,F8,08,F 
0,80,08,00,08,88,1C,18,1E,18,13,10, 
11,98,18,F8,18,78,08,685B5 
1254 DATA 88,80,80,88,1F,E®,1F,F4,8 


1,18,01,10,1F,F4,1F,E8,00,00,00,00, 
08,8F,E®,1F,F4,18,18,68678 
1255 DATA 18,10,1F,F4,8F,E0,00,00,0 
0,08,08,80F,F8,1F,F4,18,00, 10,00, 1F, 
F4,8F,F®,00,00,00,00,&866E 
1256 DATA 87,00,40,00,20,88,18,08,2 
0,00,480,00,00,00,88,0B,10,800,18,08, 
18,08,18,08,18,08,18,68142 
1257 DATA 88, 18,80, 10,88, 10,88,00,0® 
0,00,08,05,00,88,08,10,80,20,00,08, 
08,08,08,0E,88, 1F,48,68162 
1258 DATA 11,48,11,48,1F,C8,1F,88,8 
0,00,08,00,88,1F,F@,1F,F®,10,48,18, 
48,1F,C0,0F,88,08,00,68654 
1259 DATA 88,88,87,8F,88,1F,C8, 18,4 
0,18,40,08,80,80,08,08,00,08,8F,88, 
1F,C8,10,48,18,48,1F,68402 
1268 DATA F®,1F,F8,00,08,00,00,08,0 
F,80,1F,C8,12,48,12,480,13,C0,0B,8®, 
00,00,08,08,07,08,48,685BE 
1261 DATA 1F,E®,1F,F®,80,58,08,18,®8 
0,00,00,00,08,4F,88,9F,C0,98,40,98, 
48,FF,CO,?7F,C0,00,80,68942 
1262 DATA 808,88,08,1F,F®,1F,F0,00,4 
0,00,40,1F,C8,1F,80,08,00,00,00,04, 
1F,D®,1F,D®,08,00,08,60686 
1263 DATA 80,87,48,00,80,00,88,00,F 
F,D8,7F,D®,00,08,08,08,08,1F,F®,1F, 
F0,07,08,8D,88, 18,C0,687F7 
1264 DATA 10,48,00,00,80,88,84,1F,F 
8,1F,F0,00,08,00,08,0C,1F,C®,1F,C®, 
00,40,88,48,1F,C0,1F,E85BA 
1265 DATA C0,00,48,00,48,1F,C0,1F,8 
0,008,00,008,00,08,1F,C8,1F,C0,00,48, 
08,40,1F,C8,1F,880,08,60682 
1266 DATA 88,00,00,08,0F,88,1F,C®,1 
0,40,180,48,1F,C0,0F,80,80,08,00,08, 
08,7F,C®,7F,C®,10,40,6065A 
1267 DATA 10,48,1F,C®,8F,88,00,00,8 
0,08,08,8F,88,1F,C®,18,48,18,48,7F, 
C#,7F,CO,08,00,00,00,&68652 
1268 DATA 87,1F,C8,1F,C0,80,88,00,4 
0,800,40,00,08,08,80,07,09,88,13,C®, 
17,48, 1E,40,8C,88,00,68569 
1269 DATA 00,00,00,806,08,48,8F,F®, 1! 
F,F8,10,40,00,00,08,08,88,0F,C®,1F, 
CO, 18,00,18,08,1F,C0,60559 
1278 DATA 1F,C0,08,08,08,00,88, 1F,C 
0,1F,C0,18,08,18,08,80F,C8,07,C0,08, 
08,00,80,8C,1F,C®, 1F,68565 
1271 DATA C®, 18,08, 18,88,1F,C0,1F,C 
0,10,80,18,08,0F,C0,87,C8,88,08,08, 
08,08, 1D,C8,1F,C0,82,6061A 
1272 DATA 88,82,88,1F,C0,1D,C8,00,8 
0,08,008,08,4F,C8,9F,C8,90,00,98,08, 
FF,C8,7F,CO,08,08,08,&8852 
1273 DATA 08,88,18,48,1C,48, 16,48, 1 
3,48,11,C0,18,C0,00,08,08,08,08,0E, 
80,1F,58,11,480,11,48,684AD 
1274 DATA 1F,D®,1F,88,08,00,00,00,8 
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ANZEIGENSERVICE 


Die große Börse für jeden Zweck in SCHNEIDER AKTIV. Kostenlos für Privat-Inserenten. Spottbillig für gewerbliche Anbieter. Ein- 
fach Coupon ausschneiden, fotokopieren 0.ä., ausfüllen und ab die Post — Freimachen nicht vergessen! — Unsere Adresse steht 
auf dem Coupon, ebenso die Preise für gewerbliche Anbieter! Achtung! Wir weisen ausdrücklich darauf hin, daß wir offensicht- 
lich gewerbliche Anzeigen nicht kostenlos veröffentlichen und uns jedweden Abdruck kostenloser Anzeigen vorbehalten müssen, 
insbesondere, wenn deren Inhalt gegen geltendes Recht verstößt. Private Chiffreanzeigen werden nicht aufgenommen. Für Pri- 
vatanbieter: etwa bis zu acht Zeilen a 28 Anschläge. Für gewerbliche Anbieter: 5 DM p.mm. bei beliebiger Größe. 


ER IF EFEREFES SEID RS 
EI TEFRPFFEFS TIP IF IT Er 
BEBANDERHREBREREZERBENFEN DIR 
BEE BE BE Ba Ba a Da a Da DD DD Da N DD 
ERFFER FRI TEREF FREE III 


SCHNEIDER AKTIV Name 
ANZEIGENABTLG Vorname 
POSTFACH 1161 Straße /Hausnr. 
D-8044 UNTERSCHLEISSHEIM _pıLzy/Ort 


—— > 


DAS SONDERANGEBOT: 
PRIVATE KLEINANZEIGEN 
SIND KOSTENLOS 


Das bietet Ihnen ab sofort SCHNEIDER AKTIV: KLEINAN- 
ZEIGEN SIND KOSTENLOS FÜR PRIVATANBIETER! Su- 
chen Sie etwas, haben Sie etwas zu verkaufen, zu tau- 
schen, wollen Sie einen Club gründen? Coupon ausfüllen, 
auf Postkarte kleben oder in Briefumschlag stecken und 
abschicken. So einfach geht das. Wollen Sie das Heft 
nicht zerschneiden, können Sie den Coupon auch fotoko- 
pieren. Oder einfach den Anzeigentext uns so schicken, 
auf Postkarte oder im Brief. Aber bitte mit Druckbuchsta- 
ben oder in Schreibmaschinenschrift! 

Und: Einschließlich Ihrer Adresse und /oder Telefonnum- 
mer sollten acht Zeilen & 28 Anschläge nicht überschrit- 
ten werden. 

ACHTUNG: WICHTIGER HINWEIS! 

Wir veröffentlichen nur Kleinanzeigen privater Inserenten 


kostenlos, gewerbliche Anzeigen kosten pro Zeile zu 
29 Buchstaben DM 5,00 plus Mehrwertsteuer! 
Wir versenden für Privat-Inserenten keine Beleg- 
Exemplare! 
DIE INSERTION IST NICHT VOM HEFTKAUF ABHÄNGIG! 
Chiffre-Anzeigen sind nicht gestattet! Wir behalten uns 
vor, Anzeigen, die gegen rechtliche, sittliche oder sonsti- 
ge Gebote verstoßen, abzulehnen! 
Anzeigenabdruck in der Reihenfolge ihres Eingangs, kein 
Rechtsanspruch auf den Abdruck in der nächsten Ausga- 
be! 
Wir behalten uns vor, Anzeigen, die nicht zum Themen- 
kreis des Heftes — Computer — gehören, nur insoweit 
zu berücksichtigen, wie es der Umfang des kostenlosen 
Anzeigenteils zuläßt. 
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NUTZEN SIE UNSEREN BEQUEMEN POSTSERVICE 


KOMMT | 
REGELMÄSSIG 
ZU IHNEN 


INS HAUS 


Das unabhängige Magazin 
für Schneider-Computer 


GARANTIE! 

Sie können diesen Abo-Auftrag bin- 
nen einer Woche nach Eingang der 
Abo-Bestätigung durch den Verlag 
widerrufen — Postkarte genügt. An- 
sonsten läuft dieser Auftrag jeweils 
für zwölf Ausgaben, wenn ihm nicht 
vier Wochen vor Ablauf widerspro- 
chen wird, weiter. 


Finden Sie Ihre SCHNEIDER AKTIV nicht am Kiosk? 
Weil sie schon ausverkauft ist? Oder ‚‚Ihr‘‘ Kiosk 
nicht beliefert wurde? Kein Problem! Für ganze 60 / 
DM liefern wir Ihnen per Post zwölf Hefte ins Haus \ 
(Austand 80 DM). Einfach den Bestellschein aus- 
schneiden — fotokopieren oder abschreiben, in ei- 
nen Briefumschlag und ab per Post (Achtung: Porto 
nicht vergessen). SCHNEIDER AKTIV kommt dann 
pünktlich ins Haus. 


Ze >S 


ABO-SERVICE-KARTE 


Ich nehme zur Kenntnis, Ja, ich möchte von Ihrem Angebot Ausgaben an untenstehende An- 
daß die Belieferung Gebrauch machen. schrift. Wenn ich nicht vier Wochen 
erst beginnt, wenn die Bitte senden Sie mir bis auf Widerruf vor Ablauf kündige, läuft diese 
Abo-Gebühr dem Verlag ab sofort jeweils die nächsten zwölf Abmachung automatisch weiter. 
zugegangen ist! Nanie 

Vorname 

Straße /Hausnr. 

PLZ/Ort 

Ich bezahle: 


U] per beiliegendem Verrechnungsscheck 

[) gegen Rechnung 

U] bargeldios per Bankeinzug von meinem Konto 
bei (Bank) und Ort 


Kontonummer 
Bankleitzahl 
SCHNEIDER AKTIV (steht auf jedem Kontoauszug) 
POSTFACH 1161 Von meinem Widerspruchsrecht habe ich Kenntnis genommen. 


D-8044 
UNTERSCHLEISSHEIM Unterscht _____ 110087 
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0% 
Ne 
“ I “ 


TRAUN -COMPUTER 


ir wissen, es ist lästig, einen Fragebogen auszu- 

füllen. Trotzdem bitten wir Sie um Ihre Mitar- 
beit, denn wir möchten SCHNEIDER AKTIV 
noch besser, noch attraktiver machen. Dazu müssen 
wir allerdings wissen, wer unsere Leser sind, was sie 
wollen und erwarten. Deswegen bitten wir Sie, sich 
einige Minuten mit diesem Fragebogen zu beschäfti- 
gen, ihn auszufüllen und uns zurückzuschicken. Um 
Ihnen den Entschluß zu erleichtern, können Sie mit 
Ihrem Fragebogen auch gewinnen! Zum Beispiel 
einen Schneider PC 1640! Oder einen Amiga 500 mit 
Farbmonitor. Oder Ihren Traumcomputer aus dieser 
‚Preisklasse! 
‚Bitte kreuzen Sie die zutreffenden Kästchen an und 
vergessen Sie nicht, die wenigen Fragen — in Druck- 
‚schrift bitte — zu beantworten. Das Ganze dann in ei- 
nen Fensterbriefumschlag — wenn Sie keinen haben, 
müssen Sie leider die Adresse selbst schreiben — mit 
80 Pfennig frankieren und in den nächsten Brief- 
'kasten. 
ACHTUNG! WIR NEHMEN NUR ORDNUNGSGE- 
MÄSS FRANKIERTE SENDUNGEN AN! 
Briefe mit Nachgebühr werden zurückgesandt! 


UNSERE FRAGEN AN SIE: 


ALTER 

Bis 9 Jahre 
10-19 Jahre 
20-29 Jahre 
30-39 Jahre 
40-49 Jahre 
50 und älter 


0) 


ODOODODO 


BERUF 
Schüler/Student/Azubi 

Freier Beruf/Selbständig 
Leitender Angestellter/Beamter 
Landwirt 

Facharbeiter 

Arbeiter 

Ohne Beruf 


OOODODODD 


SCHULBILDUNG 

Volksschule 

Mittlere Reife/Handelsschule 
Abitur/Fachoberschule/Studium 


ODOD 


© 


©) 
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FAMILIENSTAND 
Alleinlebend 
Verheiratet 

Verheiratet mit Kindern 


ODOD 


HAUSHALTS-NETTOEINKOMMEN 
Bis DM 1000 

Bis DM 2000 

Bis DM 2500 

Bis DM 3000 

Bis DM 4000 

Über DM 4000 


DOODOD 


Hinweis: Wenn Sie diese Frage beant- 
worten, bitte das Netto-Einkommen aller 
Beschäftigten des Haushaltes angeben! 


Arbeiten Sie beruflich mit einem Com- 


puter? JaD Nein OD 
Wenn ja, mit welchem? 
BESITZ 
Haben Sie einen Computer? 
Ja DO Nein O 


Wenn Ja, welchen? 


Wenn Nein, wollen Sie einen Computer 
kaufen? JaD Nein D 
Wenn ja, welchen? 


Wenn Sie mehrere Computer haben, wel- 
chen benutzen Sie hauptsächlich? 


Haben Sie zum Computer noch Peri- (16) 
pherie? 
Ich Ich will 
besitze kaufen 
Drucker +:.,3.3:32.%..5% D DO 
Plotter ...22cceeneeen OD DO 
FlOpBV =... 00.0.0000 % mm) m) 
Kassettenrecorder ....... D m] 
Interface... 22222220: D DO 
Toolkit: Beach D 0 (7) 
Akustik-Koppler......... OD DO 
Modem ....... 2222200: DO DO 
Joystick 2... 2222000. D D 
Monitor ...: 22 ces. D O 
Fernseher ............. m] O 
Matrix-Drucker ......... DO DO 
Schreibmaschine ........ D m) 
Typenrad-Drucker ...... D D 
SONEEIGEE urn case nee m DO 


(2) SOFTWARE 
Welche Software (keine Spiele) besitzen 
Sie? 


(3) Welche Art Spiele besitzen Sie? 
Denkspiele O 
Actionspiele 
Abenteuer/ 
Adventurespiele 


D 
m) 
Geschicklichkeits- @ı) 
spiele DO 
Sonstige m 

Wieviel insgesamt? .uesssssssssnensennennnnnennnn 


() Können Sie schon programmieren? 
Ja O Nein D 
Wenn ja, in welcher Sprache? 


(5) Welche der Programmier-Sprachen möch- 
ten Sie gerne lernen? 
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An welchen Listings im Heft sind Sie 
hauptsächlich interessiert: 
Spiele 

Grafik 
Anwenderprogramme 
Utilities 


OOO0D 


Wieviele Stunden im Monat verbringen 
Sie durchschnittlich vor Ihrem Compu- 
ter? 


Was machen Sie mit Ihrem Computer? 
Spielen 

Lernen 

Archivieren (Sammlungen usw.) 
Terminkalender führen 

Briefe schreiben 

Berufliche Fortbildung 

Am BTX-Netz teilnehmen 
Programmieren lernen 

Weiß ich noch nicht 


OOOOODODODOD 


Sprechen/verstehen Sie englisch? 
Ja OD Nein DO 


Nutzen (oder wollen Sie nutzen) Sie Ih- 
ren Computer überwiegend 


im Haushalt usw. Ja OD NeinD 
Beruflich für die 

eigene Firma Ja DO Nein D 
Beruflich, um an Ihrem Arbeitsplatz: 
weiterzukommen? Ja OO NeinD 
AKTIVITÄTEN 

Sind Sie Mitglied in einem 
Computer-Club? Ja D NeinD 


Wenn Nein, interessiert Sie die 
Mitgliedschaft in einem solchen Club? 

Ja OD Nein D 
Haben Sie noch andere Hobbys? 

Ja OD Nein D 


Wenn ja, welche? 


_GEWINNSPIEL 


LESEGEWOHNHEITEN: 
Lesen Sie außer SCHNEIDER AKTIV 
noch andere Computer-Zeitschriften? 

Ja DO Nein D 
Wenn ja, welche? 


Welche davon haben Sie abonniert? 


Wieviele Personen lesen außer Ihnen 
noch SCHNEIDER AKTIV? 


Wenn Sie SCHNEIDER AKTIV lesen, 
lassen Sie sich dabei stören? 
Ja OD NeinD 


Wenn Sie SCHNEIDER AKTIV lesen, 
wie bewerten Sie dabei dieses Heft? (Bit- 
te eine Zahl von 1-6, wobei 1 die höch- 
ste, 6 die schlechteste Note ist.) 


Wenn Sie den Inhalt von SCHNEIDER 
AKTIV vorschlagen könnten, welchen 
Themen würden Sie mehr Raum geben 
oder besonders vorziehen? 
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Welche SCHNEIDER-Zeitschrift gefällt 
Ihnen am besten? 


SCHNEIDER AKTIV OD 
CPC-MAGAZIN O 
CPC-INTERNATIONAL D 


Wie beurteilen Sie den 


Kassettenservice DO 
Disketten-Service D 
Kleinanzeigenservice OD 


von SCHNEIDER AKTIV? 

(Bitte eine Zahl zwischen 1 und 6, wobei 
1 sr beste und 6 die schlechteste Note 
ist. 


KAUFGEWOHNHEITEN: 
Ich möchte meinen SCHNEIDER 
noch .......... Jahre behalten. 


Meinen Computerzubehör kaufe ich vor- 
wiegend: 

Im Warenhaus D 
beim Computerhändler O 
im Versandhandel m) 
auf dem Gebrauchtmarkt über 
Kleinanzeigen D 


Was veranschlagen Sie an Neuanschaf- 
fungskosten, um Ihre Ausrüstung zu 
vervollkommnen (pro Jahr?) 


DM 


Wenn Sie den Kauf eines neuen Com- 
puters planen, welcher Art? 

Home-Computer m) 
Personal-Computer m) 


Was würden Sie ausgeben für neue 


Computer ___ DM 
Drucker/Poter_________ DM 
Diskettenstattioin_________ DM 


Fertige Programme _____ DM 


Wenn Sie einen Personal-Computer kau- 
fen wollen, wonach richten Sie sich? 


Anzeigen in Fachzeitschriften? DO 
Berichte in Fachzeitschriften? O 
Rat des örtlichen Fachhändlers? O 


Beratung durch einen 
unabhängigen Experten? 
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Wann sitzen Sie am häufigsten am Com- 
puter? 


Tag DJ Nachts OD) Wochenende D 


Rauchen, Trinken, Essen Sie häufig beim 
Computern? Ja D Nein D 


Verbringen Sie Ihren Urlaub mit Ihrem 


® © ® 


Hobby Computern? Ja D Nein D 
GESCHLECHT: 

Männlich D 

Weiblich D 


WICHTIGE RECHTLICHE GARANTIE! 


Wir garantieren, daß die von Ihnen gemachten Anga- 
ben ohne jegliche personenbezogenen Daten (Na- 
me, Anschrift usw.) lediglich zu statistischen Zwek- 
ken elektronisch gespeichert und verarbeitet werden. 
Sämtliche Einzeldaten fallen zudem unter das Re- 
daktionsgeheimnis und werden sofort nach Auswer- 
tung gelöscht, der entsprechende Datenträger unter 
notarieller Aufsicht vernichtet. Eine Weitergabe an 
Dritte ist absolut untersagt. Zusätzliche Sicherheit: 
Sie müssen diesen Fragebogen nicht mit Ihrer An- 
schrift versehen, es genügt uns auch lediglich Ihre 
Postleitzahl! (Dabei verzichten Sie allerdings auf die 
Teilnahme an unserem Gewinnspiel.) 


GEWINNSPIEL, .. 


Unseren Hauptgewinn bestimmt der Preisträger. 


Teilnahmebedingungen: 

Unter den eingesandten Fragebogen werden — unter 
Ausschluß des Rechtsweges — die ausgelobten Preise 
ausgelost. Einsendeschluß ist der 30. Oktober 1987 
(Datum des Poststempels). Die Gewinner werden 


in der Ausgabe 2/88 veröffentlicht und/oder per- 
sönlich benachrichtigt. 


SCHNEIDER AKTIV 
POSTFACH 1161 
D-8044 UNTERSCHLEISSHEIM 


ACHTUNG: WIR WEISEN NOCH EIN- 
MAL DARAUF HIN. DASS PERSONA- 
LIEN NICHT GESPEICHERT WERDEN! 
Sie‘ können deswegen auch anonym 


bleiben, wir bitten dann lediglich um 
Ihre Postleitzahl! 


Vorname 

Name 
Straße/Hausnr. 
Postleitzahl/Ort 


Telefon (mit Vorwahl) 
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PROGRAMMSERVICE 


Hiermit bestelle ich in Kenntnis Ihrer Verkaufsbedingun- 
gen die Listings dieses Heftes auf 


U] Kassette (30 DM) L) Diskette (30 DM) 


Ich zahle: (Zutreffendes bite ankreuzen!) 
per beigefügten Scheck [)] Schein [| 


Gegen Bankabbuchung am Versandtag U] 


Meine Bank (mit Ortsname) 

Meine Kontonummer 

Meine Bankleitzahl (steht auf jedem Bankauszug) 

Vorname Nachname 

Str./Nr. PLZ/Ort 10/87 


Verkaufsbedingungen: Lieferung nur gegen Vorkasse oder Bankabbuchung. Keine Nachnahme. 
Umtausch bei Nichtfunktionieren. 


Unterschrift 
Bitte ausschneiden und einsenden an 


SCHNEIDER AKTIV 
KASSETTENSERVICE 10/87 
POSTFACH 1161 

D-8044 UNTERSCHLEISSHEIM 


---- > 
LESER WERBEN LESER 


GEWINNEN SIE EINE COMPUTER- 
UHR! Und zusätzlich eventuell 
noch ein großes Computer-Buch. 
Oder ein Paket Disketten. ODER 
AUCH EINEN COMPUTER — 
ODER EINE DISKETTENSTATION! 
Wie? Sie werben einen Abonnen- 
ten. Dann haben Sie auf jeden Fall 
schon die Computer-Uhr gewon- 
nen. Zusätzlich verlosen wir unter 
allen, die mitmachen, jeden Mo- 
nat vier weitere wertvolle Preise. 
Und alle sechs Monate gibt es ei- 
nen Hauptpreis unter allen Abo- 
Werbern zu gewinnen. Also: Mit- 
machen. Mitgewinnen. 


Ja, ich mache mit beim Abo- 
Wettbewerb. Ich habe 


Herrn /Frau 
Straße /Hausnr. 
PLZ/Ort 


als neuen Abonnenten für SCHNEI- 
DER AKTIV geworben. 


Der neue Abonnent war bisher 
noch nicht Bezieher dieser Zeit- 
schrift. 

Als Prämie erhalte ich nach Ein- 
gang des Abo-Entgeltes auf jeden 
Fall eine Computer-Uhr, wie abge- 
bildet, und nehme zusätzlich noch 
an der Verlosung des Monats so- 
wie der halbjährlichen Hauptprei- 
se teil. Mir ist bekannt, daß der 
Rechtsweg ausgeschlossen ist. 
Meinen Preis senden Sie an 


Name 

Straße /Hsnr. 

PLZ/Ort 

(Bitte ausschneiden und zusam- 


men mit der Abo-Bestellkarte links 
einsenden!) 10/87 
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RE RERNEEEN 
ee) 
7 
} 


») 
® 
= 


amme 


ce 
> 
N) 


SFR I 
ender- 


we 


PETS 


An 
Pr 


LISTING 


8,0F,88,1F,D8,10,48,10,48,1F,D®,0F, 
88,00,00,08,00,08,0F ,&0549 

1275 DATA C8,1F,D8,18,08,180,88,1F,D 
0,1F,C0,00,08,00,80,@8A,7F,C®,7F,EB, 
08,30,10,98,28,98,21,687E6 

1276 DATA 68,3F,88, 1E,00,608BD 


’r* CPC 464/664/6128 tb*# 

RRRRHHRRHRRRHRHSHHRRISHREISIHHEIESINFT 

*benoetigt File "hcopy.bin"” 

58 MEMORY &ESFFF:LOAD”hcopy.bin"”,6A@ 

88 

68 DEFINT a-z:DIM tbyte( 31) ,xink( 15 

),rhf(26) 

7a FOR i=8 TO 31:tbyte(i)=PEEK( EAUBO 

@+i1) :NEXT 

88 RESTORE:FOR i=@8 TO 15:READ xink( 

i) 

98 INK i,xink(i) :NEXT:BORDER 1:MODE 
1 

188 DATA 14,8,24,6,1,3,8,9,13,15,19 
‚26, 12,16,4,10 

118 PRINT 

128 PRINT” 

(C) 1985" 

138 PRINT” 

ock" 

148 PRINT 

158 PRINT STRAING$( 408,35) 

168 PRINT"Grosse Hardcopys koennen 

Farben durch" 

178 PARINT"unterschiedliche Graustuf 

en wiederge-"” 

188 PRINT”ben. Kleine nicht.” :PRINT 

198 INPUT”"Hcopy GROSS oder klein (6 

/k)”;a$:gk$=UPPER$( a$) 

IF gk$<>"G”"AND gk$<>"K”"THEN 198 

a$="#=.pic"”:|DIA,@a$: INPUT"Filen 

ame :",a$ 

LOAD"”"”+a$, 866800 

3=8:FOR i=8 TO 15:xink( i)=PEEK( 

667D8+i) : j=j+xink(i) :NEXT: xmode=PEE 

K( E67E08) 

248 IF j MOD 256<>PEEK(&667E1) OR j=- 

8 THEN GOSUB 378:IF gk$="G"”THEN 340 

258 IF gk$="K"THEN 398 

268 INPUT"”Farben beruecksichtigen ( 

3/n)";a$ 

278 a$=UPPER$( a$) :IF a$="N"”THEN 348 
ELSE IF a$<>"J"THEN 268 

288 FOR i=8 TO 26:READ rhf(i) :NEXT 

298 DATA 1,15,15,3,3,12,14,14,14,13 

‚13,9,2,2,8,18,18,10,5,5,6,7,7,11,4 

‚4,8 


1 PRRRHRRREIRRRRRRHRHRHSRIHTISEIHEIHESFIE 
2 8 GCOPY - HARDCOPYROUTINE * 
3 '# VON # 
4a '* GUENTHER RADESTOCK = 
5 ’# FUER # 
6 ’* SCHNEIDER AKTIV * 
7 
8 
9 


Gcopy v1.1 Copyright 


by Guenter Radest 


388 
318 
328 
338 
T 
348 MODE xmode 

358 CALL &6AQ28:FOR i=8 TO 31:POKE & 
ABBY+i,tbytel(i) :NEXT 

368 GOTO 88 

378 INPUT”Bildmode (8-2) "”";xmode:IF 
xmode<® OR xmode>2 THEN 378 

388 RETURN 

398 MODE xmode:FOR i=1 TO 15:INK i, 
1:NEXT:CALL &EA138:G0OTO 88 


188 
158 
288 
388 
358 
4988 
458 
588 
558 
et" 
658 a=&GABBB:e=-6A388: zb=-180808:e=e+1 
668 FOR i =a TO e:READ d$:IF LEFT$( 
d$,1)="&" THEN flag =-1 

678 IF (flag AND ps<>VAL(d$)) THEN 
PRINT"Fehler in Zeile "zb+1:END 

688 IF (flag AND i=e) THEN SAVE”Hco 
py-bin"”,b,6A808,&388:END 

698 IF flag THEN i=-i-1:zb=zb+1:ps=® 
:d$="":flag = 8:6G0T0 738 

788 d$="&"+d$:POKE i,VAL(d$) :ps=ps+ 
VAL(d$): 

738 IF i < e THEN NEXT i 

1881 DATA 88,88,55,55,44,11,55,41,6& 
8195 
18092 
882B 
1883 
8898 
1884 
824D 
1985 
88EE 
1886 
81984 
19897 
815B 
1888 
8188 
1889 
Ba17A 
1818 
8178 
1811 
8136 


FOR i=8 TO 15:nr=2#rhf( xink(i)) 
POKE &AB88+2*#i,tbyte(nr) 

POKE &ABB1+2#i,tbyte(nr+1) :NEXT 
FOR i=8 TO 15:INK i,xink(i) :NEX 


RRRRRRRRRIRHRRRRRHIEISTHIHIHIHHIETHHE TEN 
ar HCOPYLADER * 
’#ERZEUGT BINAERFILE HCOPY.BIN*# 
a FUER * 
a PROGRAMM HCOPY.BAS * 
* SCHNEIDER AKTIV * 
’* CPC 464/664/6128 ME* 
RRRRRIRRHIIRHHIIIRRIHEIRIIHHEIIHIHIESE RUE 


PRINT "Bitte warten, CPC arbeit 


DATA 81,88, 18,01,84,81,88, 14,& 


DATA 84,11,05,58,15,88,11,00,6 
DATA 38,30,33,64,61,74,61,20,6 
DATA 05,80,20,31,30,30,33,05,& 
DATA 80,26,41,38,31,38,04,00,6& 
DATA 41,30,31,38,10,00,38,34,6& 
DATA 2C,31,31,20,38,35,20,35,& 
DATA 38,2C,31,35,20,30,30,2C,& 
DATA 31,31,20,38,30,2C,26,30,6& 


DATA 38,39,30,04,00,380,30,39,6& 
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LISTING 


1812 
813B 
1813 
B817F 
1914 
817B 
1815 
B12E 
1816 
8188 
1817 
B17A 
1818 
8131 
1819 
8183 
18208 
B17F 
1821 

Be1ac 
1822 
8185 
1823 
0184 
1824 
817B 
1825 
8132 
1826 
817F 
1827 
8188 
1828 
B88DA 
1829 
8188 
1830 
817A 
1831 

B12F 
1832 
8188 
1833 
B88FD 
1834 
BO14E 
1835 
8184 
1836 
B812C 
1837 
8188 
1838 
88DB 
1839 
0188 
19848 
8128 
1841 

0155 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


38,19,00,30,34,2C,31,31,& 
2C,30,35,2C,35,30,2C,31,& 
35,20,30,30,2C,31,31,2C,& 
38,38,2C,26,18,80,30,34,& 
2C,31,31,2C,38,35,2C,35,& 
38,20,31,35,2C,30,30,2C,& 
31,31,2C,38,38,2C0,17,80,6& 
38,34,2C,31,31,2C,30,35,& 
2C,35,380,2C,31,35,2C,30,& 
38,2C,31,31,2C,380,30,82,& 
08,30,30,15,00,30,34,2C,& 
31,31,2C,30,35,2C,35,30,6& 
20C,31,35,2C,380,30,2C,31,& 
31,2C,14,80,38,34,20,31,& 
31,20,30,35,2C,35,30,2C,& 
31,35,2C,30,38,2C,31,31,& 
02,08,31,31,12,00,30,34,6& 
20C,31,31,2C,38,35,20,35,& 
38,20C,31,35,2C,30,30,2C,& 
11,00,30,34,2C,31,31,2C,& 
30,35,2C,35,30,2C,31,35,& 
2C,30,30,02,08,30,30,8F,& 
00,30,34,2C,31,31,2C,38,& 
35,2C,35,30,2C,31,35,2C,& 
BE,00,30,34,2C,31,31,2C,6& 
38,35,2C,35,38,20,31,35,& 
02,88,31,35,0C,88,30,34,& 
2C,31,31,2C,38,35,20,35,& 
38,2C,0B,80,38,34,20,31,& 


31,2C,30,35,2C,35,38,82,& 


1842 
BBFE 
1843 
8127 
1844 
8183 
1845 
88D1 
1846 
8123 
1847 
88F5 
1848 
B8F6 
1849 


888A 
1858 


8899 
1851 
B88ES 
1852 


‚Bac2 
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1853 
8114 
1854 
88B6 
1855 
88F® 
1856 
88EB8 
1857 
88C2 
1858 
8118 
1859 
88B6 
1868 
813A 
1861 
e24D 
1862 
8175 
1863 
817A 
1864 
8173 
1865 
a12F 
1866 
8221 
1867 
B88E8 
1868 
813D 
1869 
813B 
1878 
O17A 
1871 
8179 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


08,35,30,809,08,30,34,2C,& 
31,31,2C0,30,35,2C,08,00,& 
30,34,2C,31,31,2C0,30,35,& 
02,00,30,35,06,80,30,34,6& 
2C,31,31,2C,05,00,30,34,6& 
20C,31,31,02,08,31,31,83,6& 
00,30,34,2C,02,00,30,34,& 
02,00,30,34,01,00,22,01,& 
00,00,03,00,26,30,30,83,& 
00,26,30,36,03,00,26,30,& 
35,03,00,26,31,30,03,00,& 
26,34,30,03,08,26,30,31,& 
03,00,26,30,34,03,00,26,& 
30,32,03,00,26,32,30,03,6& 
08,26,308,31,03,00,26,30,& 
34,03,00,26,30,32,03,00,6& 
26,38,30,03,08,26,30,31,6& 
03,00,26,30,34,03,00,26,& 
30,32,27,00,20,31,30,30,& 
32,64,61,74,61,20,38,31,6& 
2C,30,30,2C,31,30,2C,30,& 
31,2C,30,34,2C,38,31,2C,6& 
38,30,2C,31,34,20,26,30,6& 
30,32,42,0A,00,28,31,30,& 
38,32,64,61,74,61,20,05,& 
08,20,31,30,38,32,05,00,& 
26,41,30,31,30,04,00,41,6 
38,31,30,10,80,38,31,2C,& 
38,30,2C,31,30,2C,30,31,& 


2C,38,34,2C,30,31,2C,30,& 


LISTING 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


DATA 


38,20,31,34,2C,26,30,30,& 
32,42,04,00,30,30,32,42,& 
19,08,38,31,2C,38,3®,2C,& 
31,30,2C,30,31,2C,30,34,6& 
2C,30,31,2C,30,30,2C,31,6& 
34,20,26,18,00,33,34,2C,& 
32,43,2C,32,36,2C,31,38,6 
2C,38,30,2C,0E,00,33,34,& 
2C,32,43,20,32,36,2C,31,& 
38,2C,30,30,82,88,30,38,& 
0C,00,33,34,20,32,43,2C,& 
32,36,2C,31,38,2C,0B,80,& 
33,34,20,32,43,20,32,36,& 
2C,31,38,82,88,31,38,89,& 
08,33,34,20,32,43,2C,32,6& 
36,2C,88,80,33,34,2C,32,& 
43,20,32,36,02,08,32,36,& 
06,00,33,34,20,32,43,2C,6& 
05,00,33,34,2C,32,43,02,& 
00,32,43,03,08,33,34,2C,& 
02,008,33,34,02,08,33,34,& 
01,080,22,01,00,00,83,08,& 
26,30,30,83,08,26,38,36,& 
03,00,26,30,35,03,00,26,& 
31,30,03,80,26,34,30,803,& 


08,680088 


IURURURURHIETRTETETETETETE TEE TE TEE SET SE TE TEIE EEE 


ı% 
.E 
‚% 
’% 
’%* 
’% 


FONTED-ZEICHENSATZEDITOR * 
VON * 

GUENTHER RADESTOCK = 
FUER * 

SCHNEIDER AKTIV * 


CPC 464/664/6128 tb* 


EEE SIE TEE IE IE RESET SE IE SEITE TE SE SE SIE SE IE SEE I IH 


9 *benoetigt File "proport.bin” 

18 KEY DEF 72,1,6F8:KEY DEF 75,1,6F 

3:KEY DEF 73,1,6F1:KEY DEF 74,1,6F2 

28 KEY DEF 76,8,6E@:KEY DEF 77,8,13 

38 IF HIMEM<>32767 THEN MEMORY 3276 

7:LOAD”proport.bin", 32768 

48 INK 8,1:INK 1,26:BORDER 8@:MODE 1 

58 DEFINT a-z:DIM pix(23,15),byte(2 

3,1),p$C1):p$l8)="."”:p$l 1) ="*" 

68 POKE &9888,2:FOR i=-69881 TO 6986 

@:POKE i,8:NEXT 

78 REM Hauptmenue 

88 CLS:PRINT:PAINT"Proportionalschr 

ift Editor 2.1":PRINT”Copyright (C) 
1985 G.Radestock" :PRINT 

98 PRINT:PRINT"” 1 - Zeichen editie 


ren” 

188 PRINT:PRINT" 2 - Zeichensatz a 
nzeigen"” 

118 PRINT:PAINT" 3 - Zeichensatz 1 
oeschen" 

128 PRINT:PRINT" 4A - Laden” 

138 PRINT:PAINT" 5 — Speichern” 
148 PRINT:PRINT" 6 - Programmende” 


158 PRINT:PRINT:INPUT"Ihre Wahl ";f 
k:IF fk<1 OR fk>6 THEN 88 
ON fk GOTO 268, 188,68,218,238, 1 


END 

REM Zeichensatz anzeigen 

CLS:FOR y=-8 TO 5:x=8:FOR i=16%y 
TO 16%y+15:1%=8:CALL 32768, i+32,x, 
349-608*y,@1 

288 x=x+1:NEXT i:NEXT y:WHILE INKEY 
$<>"":WEND:WHILE INKEY$="":WEND:GOT 

0 88 

218 INPUT"Filename"”;a$:IF a$<>""THE 
N LOAD ""+a$,690808 

228 GOTO 88 

238 INPUT"Filename"”;a$:IF a$=""THEN 
88 

248 x=69881:FOR i=32 TO 127:x=x+2#Pp 
EEK( x) +1:NEXT:SAVE "”"+a$,b,69008, x- 

690088 

258 GOTO 88 

268 CLS:PRINT"Zeichen editieren:":P 
RINT:LINE INPUT"Zeichen oder :ASCII 

code ";a$ 

278 IF a$=""THEN 88 ELSE IF LEFT$(Ca 
$,1)=":"AND LEN(a$)>1 THEN c=VAL(MI 

D$Ca$,2,8)) ELSE c=ASC(a$) 

288 ca=&9881:FOR i=32 TO c-1:ca=ca+ 
2#PEEK( ca) +1:NEXT:1=PEEK( ca) :ERASE 
pix:DIM pix( 23,15) 

298 FOR x=@8 TO 1-1:b=PEEK( ca+1+2%x) 
:FOR y=8 TO 15:pix(x,y)=b MOD 2:b=b 
\2:NEXT y 

388 b=-PEEK( ca+t2+2%x) :FOR y=®8 TO 7:p 
ix{x,y)=b MOD 2:b=b\2:NEXT y:NEXT x 
318 REM Bildschirmaufbau 
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LISTING 


328 CLS:FOR y=8 TO 15:FOR x=8 TO 23 
:PARINT p$Clpix(x,y)); :NEXT:PRINT:NEX 
T 

338 
mit 


x=8:y=15:PAINT:PRINT"Editieren 
Cursortasten & Copy" :PRINT"”LENT 


ER] =Ende” 
348 LOCATE x+1,y+1:CALL &BB81 
358 a$=-INKEY$:IF a$="" THEN 358 ELS 


E CALL &BB84:IF a$=CHR$( 13) THEN 428 
368 IF a$=CHR$( 224) THEN pix(x,y)=1- 
pix(x,y) :PAINT p$(lpix(x,y)); 


378 IF a$=CHA$( 248) AND y>8 THEN y=y 
a58 IF a$=CHA$([ 241) AND y<15 THEN y= 
= IF a$=CHRA$( 242) AND x>B THEN x=x 
Aus IF a$=CHRA$( 243) AND x<23 THEN x= 
zn GOTO 348 

428 LOCATE 1,17:PRINT"”C(CTAL+T) 


C(CTAL+J)CCTAL+J) Bewegen Sie den Cur 
sor auf die letzte" 

438 PRINT”"Spalte des Zeichens und": 

PARINT"druecken Sie [ENTER] 

448 LOCATE x+1,17:PRINT"(CTAL+Q) 

( CTAL+R) *" 

458 a$=INKEY$:IF a$=""THEN 458 

468 IF a$=CHRA$( 242) AND x>8 THEN x=x 

1 

478 
x+1 

488 IF a$<>CHA$( 13) THEN 448 

498 FOR i=1 TO 16:L0OCATE x+2,i:PRIN 

T"CCTRAL+R) ” : NEXT :PRINT”CCTAL+T)” 

588 PRINT"”Zeichen wird definiert:": 

PRINT"Bitte warten !” 

518 nl=x+1:FOR x=8 TO nl-1:byte(x,® 

)=8:byte(x,1)=-®8 

528 FOR y=-15 TO 8 STEP-1:byte(x,8)= 

2#byte(x,8)+pix(x,y) :NEXT y 

538 FOR y=7 TO 8 STEP-1:byte(x,1)=-2 

byte(x,1)+pix(x,y) :NEXT y:NEXT x 

548 v=2#(n1-1):IF v=-8 THEN 578 ELSE 
IF v<8 THEN 568 

558 FOR i=-69888+5888 TO ca STEP-1:P 

OKE i,PEEK(i-v) :NEXT:GOTO 578 

568 FOR i=ca TO 69888+5888:POKE i,P 

EEK( i-v) :NEXT 

578 POKE ca,nl:FOR i=®8 TO nl-1:POKE 
ca+1+2#i,byte(i,®) 

588 POKE ca+2+2%#j,byte(i,1):NEXT:GO 
TO 78 


IF a$=CHR$( 243) AND x<23 THEN x= 


188 0 BRRRHRRRHRIRISHIRISIHRIHIIHHIHIERESHHHHAENEN 
288 ’* FONTED-DATALADER ERZEUGT * 
308 ’*# BINAERFILE PROPORT.BIN * 


488 ’# FUER PROGRAMM FONTED.BAS * 
SBB "RR ESSEN EEE 


558 MEMORY E7FFF 


568 CLS:PRINT”BITTE WARTEN, 
ARBEITET" 


658 a=68888:e=6BBBF : zb=- 1808: e=e+1 
668 FOR i =a TO e:READ d$:IF LEFT$( 
d$,1)="&" THEN flag =-1 

678 IF (flag AND ps<>VAL(d$)) THEN 
PRINT”Fehler in Zeile "”zb+1:END 

688 IF (flag AND i=e) THEN SAVE "PR 
OPORT.BIN”,B,&8888,&98:END 

698 IF flag THEN i=i-1:zb=>zb+1:ps=8 
:d$="":flag = 8:G0T0 738 

788 d$="&"+d$:POKE i,VAL(d$) :ps=ps+ 
VAL(d$): 

738 IF i < e THEN NEXT i 

1881 DATA CD,11,BC,EE,83,3D,47,D6,8 
1,78,17,32,86,88,DD,6E,88,D0D,66,01, 
22,8C,88,36,80,23,36,689F9 

1882 DATA 88,DD,6E,82,D0D,66,83,22,8 
A,88,DD,6E,84,D0DD,66,85,22,88,80,DD, 
7E,86,06,28,D8,21,801,6B8AD1 


IHR CPC 


‚1883 DATA 98,28,8A,47,7E,87,30,23,3 


D,28,FC,180,F7,7E,23,B7,C8,47,C5,7E, 
23,E5,2A,8A,88,ED,5B,68BFB 

1884 DATA 88,80,CD,71,80,E3,7E,23,E 
3,CD,71,88,2A,86,88,E5,19,22,88,8®, 
2A,8C,880,7E,D1,83,77,68DC2 

18085 DATA E1,C1,18,08,C9,06,88,17,3 
0,0B,ES,D5,C5,F5,CD,EA,BB,F1,C1,D1, 
E1,23,23,18,EE,C9,88,&68F®A 

1886 DATA 88,48,81,C8,808,8E,01,80,® 
08,601AB 
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16. Muster 

Gpaint bietet die Möglichkeit, Flächen mit Mustern 
ausgefüllt zu zeichnen. Dies wird durch die Verknüp- 
fung zweier Bildschirme erreicht. Dabei mußte wegen 
Speicherplatzmangel ein Kompromiß eingegangen 
werden: Um die UNDO Funktion mittels DEL-Taste 
zu erhalten, ist es leider nur möglich, Muster richtig 
über Flächen mit der Farbe 0 (ganz links im Farb- 
menü) zu legen. 

Des weiteren werden die zu musternden Flächen 
immer erst in der höchsten Farbe gezeichnet und spä- 
ter gemustert. Um in allen Bildmodi arbeiten zu kön- 
nen, sind Muster immer zweifarbig (Farbel und 
Farbe2). 

Im Mustermenü ist der linke ausgefüllte Kasten kein 
eigentliches Muster. Er wird angewählt, wenn etwas 
ohne Muster, nur in der Stiftfarbe, gezeichnet wer- 
den soll. 

Ein weiterer Menüpunkt (Linker Pfeil, Auswahl siehe 
Farben) ist Muster Editieren. Das Muster wird ver- 
größert in den Bildschirm eingeblendet und kann wie 
bei Lupe bearbeitet werden. Feuer invertiert einen 
Musterpunkt, Space/Feuer? beendet den Editiervor- 
gang. Mit der CLR-Taste kann das gesamte Muster 
gelöscht wurden. Die Muster besitzen in den unter- 
schiedlichen Grafikstufen unterschiedliche Punktgrö- 
ßen: in ModeO 8Pkte breit, im Model 16Pkte un 

im Mode2 32Pkte. 


Wenn Sie ein Muster jedoch im Mode erstellen, so 
ändern sich nicht nur die ersten acht Punkte. Wenn 
Sie in Mode2 schalten (S-Menü), werden Sie feststel- 
len, daß sich der Rest auch geändert hat, das Muster 
bleibt symmetrisch. So können Sie sich unter Um- 
ständen etwas Arbeit ersparen, wenn Sie ein Muster 
in einem niedrigeren Bildmodus erstellen. 


17. Diskmenü 

Im Diskmenü werden Grafiken gespeichert und gela- 
den und Zeichensätze geladen. Das Programm fordert 
dazu jeweils den Dateinamen des entsprechenden Files 
auf Diskette an. 

Zeichensätze sind alle Files mit der Extension. CHR, 
Grafiken tragen die Extension .PIC oder .BIN. Beim 
Laden von Bildern überprüft das Programm eine Prüf 
summe in einem nicht benutzten Teil des Grafikspei- 
chers. Wurde ein Bild mit Gpaint oder HGRGRAF 
erstellt und diese Prüfsumme ist vorhanden, so werden 
der Modus und die Farben automatisch eingestellt, 
sonst müssen Sie das manuell vornehmen. 

Ein mit senkrechten Streifen durchzogenes Bild deu- 
tet auf einen falsch eingestellten Bildmodus hin. Der 
Bildmodus wird mit dem Punkt Auflösung im S-Menü, 
die Farben mit Farbe ändern im Farbmenü verstellt. 
Wenn Sie die Grafiken in Basic-Programmen verwen- 
den wollen, können Sie die Farben mit der folgenden 
kleinen Schleife einstellen: 

FOR I=0 TO 15:INK I,PEEK(&C7DO+D): NEXT 

Wenn beim Diskettenbetrieb ein Fehler auftritt, arbei- 
tet der Rechner normal weiter. Daher sollten Sie nach 
dem Abspeichern immer das Inhaltsverzeichnis Ihrer 
Diskette überprüfen. 

Mit der Funktion Ausschnitt laden können Teile aus 
anderen Bildern in die aktuelle Zeichnung kopiert wer- 
den. Die Farben werden dabei nicht berücksichtigt. 


18. S-Menü 

Alle anderen wichtigen Funktionen, die im Haupt- 
menü nicht vorhanden sind, finden Sie im S-Menü. 
Dies sind: 


18.1 Auflösung 

Verändern des Bildschirmmodus. Gpaint ist beim 
Start auf Model eingestellt, kann aber in allen Modi 
eingesetzt werden. 


18.2 Text 

Hiermit kann Text in Proportionalschrift in die Grafik 
eingefügt werden. Sie werden aufgefordert, eine Zeile 
Text in das obere Bildschirmfenster zu schreiben. Er 
kann maximal 64 Zeichen lang sein und wird mit 
Drücken der ENTER-Taste beendet. 

In der Grafik erscheint nun ein Strich mit der Länge 
des eingegebenen Textes. Er wird an die gewünschte 
Stelle bewegt und nach Drücken der Feuertaste er- 
scheint der Text in entsprechender Farbe und Muster. 
Durch zweimaliges Ausdrucken (um einen Punkt ver- 
setzt) können Sie auch Fettdruck erzielen. Nach Drük- 
ken der DEL-Taste kann der Text eventuell neu pla- 
ziert werden. Mit R gelangt man zurück in den Ein- 
gabemodus. 


18.3 Vergrößern 

Rechteckige Flächen werden eingerahmt und um das 
Doppelte vergrößert. Der zweite Punkt des Rechtecks 
gibt dabei die Richtung an, in die vergrößert wird. 


_LISTING 


18.4 Verkleinern 

Eine rechteckige Fläche wird eingerahmt und in Rich- 
tung auf den zuerst eingegebenen Eckpunkt des Recht- 
ecks um die Hälfte verkleinert. 


18.5 Drehen 

Diese Funktion ist eigentlich nur im Model sinnvoll, 
weil sie sonst wegen der nicht mehr ‘quadratischen 
Bildpunkte verzerrt. Der gewählte Anfangspunkt bil- 
det die linke untere oder rechte obere Ecke eines 
Quadrates (im Model), welches nach rechts oder 
links ausgezogen wird. Dieses Quadrat wird dann um 
90 Grad gegen den Uhrzeigersinn verdreht. Es kann 
auch mehrmals hintereinander gedreht werden. 
Anm.: Vergrößern, Verkleinern und Drehen deakti- 
viert ein eventuell ausgewähltes Muster. 

Gpaint läuft auf allen Rechnern der CPC-Serie unter 
AMS- und V-DOS im Diskettenbetrieb. 


(JE) 


Das universelle Zeichen- 
programm für den [P(464 


Proportionalschrift 


mit verschiedenen 


Zeichensaetzen! 


Dick »* Dünn 


MUSTER eensone 
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HISOFT PASCAL 


Heute geht’s ans RAM — es sollen nämlich 
Pull-Down Menüs programmiert werden. Sie kennen 
diese Art von Auswahllisten sicherlich von größeren 
Rechnern, etwa den Atari ST’s oder dem Schneider PC. 
GEM heißt dort das Zauberwort, der ‚Graphic 
Environment Manager (Manager der grafischen Um- 
gebung). Da die CPC’s aber keine solche Speicherplatz- 
Riesen sind, beschränken wir uns auf Textfenster und 
programmieren unser TEM, den „Text Environ- 
ment Manager”. 


Als es darum ging, dieses 
Programm zu schreiben, 
kam zuerst einmal der 
Gedanke auf, die Fenster- 
inhalte dynamisch abzu- 
speichern. Aber das da- 
durch entstehende Spei- 
cherchaos verhinderte die 
Durchführung. HiSoft 
Pascal geht nämlich nicht 
gerade sparsam mit dem 
Speicher um, der dyna- 
mischen Variablen zuge- 
teilt wird. Beschränken 
wir uns daher auf vier 
Windows, deren Inhalte 
statisch abgespeichert 
werden. 


PROBLEMLOSES 
ARBEITEN MIT ALLEN 
FENSTERN 


Das dafür vorgesehene 
Array kann jeweils ein 
Fenster speichern, das 
den kompletten 80-Zei- 
chen-Bildschirm ein- 
nimmt. Wenn Sie jedoch 
ausschließlich kleinere 
Windows verwenden, 
können Sie die zweite In- 
dizierung soweit ein- 
schränken, daß sie gerade 
noch die Anzahl der Zei- 
chen im größten Fenster 
umfaßt. Dafür können Sie 
den ersten Indexbereich 
erweitern, so daß Sie pro- 
blemlos mit allen sieben 
möglichen Windows arbei- 
ten können. 

In den Prozeduren selbst 
ist hierzu keine Änderung 
nötig; dafür kann es zu 
Programmabstürzen kom- 
men, wenn Sie sich nicht 
an den gewählten Be- 
reich halten. 


VERWENDUNG VON 


FIRMWARE-ROUTINEN 


Zunächst einmal sind eini- 


ge Prozeduren und Funk- 
tionen nötig, damit Sie 


überhaupt Window-Berei- 
che definieren und ver- 
wenden können. Die Pro- 
zedur ‚„usewindow“ ver- 
anlaßt zum Beispiel, daß 
WRITE, WRIT LN. 
READ und READLN 
das ge ewählte Textfenster 
zur Ausgabe verwenden. 
Dafür wird die Firmware- 
Routine “txt str select“ 
(text stream select) ver- 
wendet. Kommen Sie 
bitte nicht in Versuchung, 
hier die 8 als Parameter 
zu verwenden, um so auf 
den Drucker gelangen zu 
wollen. Wie Sie bei unse- 
rer Hardcopy-Prozedur 
gesehen haben, sind dafür 
andere Routinen not- 
wendig. 

Eine Funktion zur Bestim- 
mung der ‚Größe ‚Eines 
Fensters, “wsize“, ist 
nötig, um die Windows 
abzuspeichern. Da sie 
vier Werte liefern muß, 
wurde sie eben als Proze- 
dur geschrieben. Die Addi- 
tion einer 1 zu den erhal- 
tenen Werten erklärt sich 
dadurch, daß intern die 
obere linke Ecke als 0/0 
bezeichnet wird, sie für 
den Anwender und für 
die später benötigte Rou- 
tine “txt set cursor“ je- 
doch die Koordinaten 

1/1 hat. 

Schließlich müssen Sie ein 
Fenster erst einmal defi- 
nieren können. Dafür ist 
“definewindow“ ‘da. Die 
Nummer des Fensters ist 
als Parameter selbstver- 
ständlich; die Begren- 
zungen werden in der 
Reihenfolge “Koordina- 
ten der linken oberen 
Ecke / Koordinaten der 
rechten unteren Ecke“ 
angegeben. Da links oben 
für Sie weiterhin 1/1 
bleiben soll, wird auto- 
matisch 1 subtrahiert. 


SERIE 


Die Prozedur “put“ spei- 
chert einen Fensterinhalt 
in dem dafür reservierten 
Speicherbereich. Zunächst 
wird die Fenstergröße be- 
stimmt. Um die Zeichen 
zu lesen, wird auf Win- 
dow O geschaltet, dessen 
Größe (ganzer Bildschirm- 
bereich) Sie aus diesem 
Grund nicht verändern 
dürfen. Jetzt wird der 
Reihe nach der Cursor auf 
jede Stelle des Fensters 
gesetzt, das dort befind- 
liche Zeichen gelesen und 
abgespeichert. Die Rou- 
tine “txt r(ea)d char“ ist 
zwar in der Lage, inverse 
Zeichen zu erkennen; es 
wird jedoch nicht ver- 
merkt, daß das Zeichen 
invertiert war. Bei der 
Wiederherstellung des Fen- 


'sters erscheint daher alles 


in ‚Normalschrift“. Die- 
se Wiederherstellung wird 
von der Procedur “get‘“ 
übernommen, die in sehr 
verwandter Weise zu 
“put“ arbeitet. Ihr Funk- 
tionsprinzip ist daher ein- 
fach zu erkennen. Eine 
weitere Firmware-Rou- 
tine wird in der Prozedur 
“clw“ (soll heißen: clear 
window) genutzt. Sie 
dient dazu, ein bestimm- 
tes Bildschirmfenster zu 
löschen. 
Beachten Sie bitte, in 
welchem Fenster Sie sich 
nach Verlassen der ein- 
zelnen Prozeduren befin- 
den. Bei “get‘ und “put“ 
ist dies Window 0, bei 
allen anderen Prozeduren 
das jeweils angegebene. 
Das Hauptprogramm si- 
muliert eine menüge- 
steuerte Auswahl. Günsti- 
ger als hier wäre es wohl, 
jedes angezeigte Fenster 
mit Hilfe der Schneider 
Sonderzeichen zu umrah- 
men. Eine entsprechen- 
de Prozedur “frame“ 
ist schnell geschrieben. 
Versuchen Sie’s doch ein- 
fach selbst — natürlich 
unter Verwendung von 
“wsize‘ 
Die Routine könnte auch 
die Möglichkeit enthalten, 
in die Mitte der oberen 
Begrenzung eine Über- 
schrift (in inversen Zei 
chen) zu integrieren. Da- 
mit bekäme unser Win- 
dow-System einen bei- 
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nahe PESISSSDELEN 
Touch. 

Wenn Sie ein Fenster ein- 
mal mit ‘““put“ abgelegt 
haben, bleibt es gespei- 
chert. Sie können folg- 
lich, sooft Sie wollen, 
andere Windows darüber- 
legen und den Hinter- 
grund wieder herstellen. 
Auch nach einen ““clw“ 
ist dies noch möglich. 
Wenn Sie jedoch in dem 
betreffenden Fenster 
etwas verändern, müssen 
Sie es neu speichern, 

da sonst der veraltete 
Hintergrund wieder er- 
scheinen würde. 


AUSLAGERN AUF 
DISKETTE SPART 
SPEICHERPLATZ 


Um den Zeitaufwand mög- 
lichst gering zu halten, 
sind kleine Fenster zu emp- 
fehlen. Im Prinzip steht 
dem Vorhaben jedoch 
nichts im Wege, eine 
komplette Bi dschirmsei- 
te auszuiagern. Sie kön- 
nen theoretisch eine un- 
begrenzte Menge an Fen- 
sterinhalten mit TIN 

und TOUT oder unserer 
Dateiverwaltung aus der 
letzten Folge auf Diskette 
speichern und wieder la- 
den. Somit müssen Sie 
nicht sämtliche Menütexte 
in dem vielleicht knappen 
RAM ablegen. 

Wie Sie wahrscheinlich be- 
reits aus dem Aufbau der 
Prozeduren ‘“‘get‘“ und 
“put“ ersehen haben, 
können Sie jederzeit die 
Position ‚eines Fensters 
vor seiner Wiederherstel- 
lung verändern — jedoch 
keinesfalls seine Größe, 
da sonst Chaos ausgege- 
ben werden würde. Eine 
eventuell nötige Größen- 
änderung kann jedoch 
nach “get“ durchgeführt 
werden. 

Die nächste Folge wen- 
det sich gleichermaßen an 
grafisch und mathema- 
tisch Interessierte. Dort 
werden Sie sehen, wie 

Sie zum Beispiel ein und 


dieselbe Routine dazu 


verwenden können, ver- 
schiedene Ausschnitte 
einer Funktion zu zeich- 
nen. (A. Ertl) 


LISTING schneide 
| aktiv) 


188 { FERRARI THREE THIS TEE TIEFE } 


118 {* HISOFT WINDOWS Version 1.8 28/12/1986 %*} 
128 {* (c) by Alwin Ertl %*} 
130 RRRRRHRRRHRIHRIHHIIHHIIIH HIHI III IISEIIN UI NEN 
1408 


158 PROGRAM windows; 


168 

178 TYPE 

188 stack = PACKED ARRAY [1..4,1..2888] OF char; 
198 

2088 VAR 


218 wstack : stack; 

220 i : integer; 

230 

248 PROGEDURE usewindow (w : integer); 
258 BEGIN 


268 ra := chr(w); 

270 user (#bbb4); {txt str select} 
288 END; 

298 


388 PROCEDURE wsize (w : integer; VAR a,b,c,d : integer); 
318 BEGIN 


328 usewindow (w); 

330 user (#bb69) ; {txt get window} 
348 a := ord(rh)+1; b := ord(rd) +1; 
358 ce := ord(rl)+1; d := ord(re) +1 
368 END; 

378 


388 PROCEDURE definewindow (w, a,b,c,d : integer); 
399 BEGIN 


4989 usewindow (w); 

418 rh := chr(a-1); rd := chr(c-1); 
4208 rl := chr(b-1); re := chr(d-1); 
438 user (#bb66); {txt win enable} 
aa8 END; 

450 

468 PROCEDURE put (w : integer); 

4708 VAR 

4808 a,b,c,d,z,i,j : integer; 

498 ch : char; 

5908 BEGIN 

518 wsize (w,a,b,c,d); 

529 usewindow (B); 

538 z := 8; 

548 FOR i := a TO b DO 

558 FOR j := c TO d DO 

568 BEGIN 

578 rh := chr(i); rl := chr(jJ); 
589 user (#bb75); {txt SET cursor} 
598 user (#bb68); {txt rd char} 
698 ch := ra; 

6108 z := succ (z); 

628 wstack [w,z] := ch 

6308 END 

648 END; 

658 


668 PROCEDURE get (w : integer); 


678 VAR =» 
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688 a,b,c,d,z,i,j : integer; 

698 BEGIN 

798 wsize (w,a,b,c,d); 

718 usewindow (8); 

7208 z := B; 

738 FOR i := a TO b DO 

740 FOR 3 := c TO d DO 

758 BEGIN 

768 rh := chr(i); rl := chr()J); 
778 user (#bb75); {txt SET cursor} 
788 z := succ (z); 

798 write (wstack[w,z]) 

888 END 

818 END; 

828 


838 PRAROCEDURE ciw (w : integer); 
848 BEGIN 


858 usewindow (w); 

868 user (#bb6c) {txt clear window} 
878 END; 

888 

898 BEGIN 

988 page; 


918 definewindow (1,18,18,28,28); 

928 definewindow (2,15,15,48,22); 

938 usewindow (1); 

948 write ( "HAUPTAUS- WAHLLISTE----------- I>Editie- ren’); 
958 write ( ’2>Diskette 3>Beenden Wahl mit Pfeiltaste’); 
968 put (1); 

978 FOR i := 1 TO 18888 DO ; {warten} 

988 usewindow (2); 

998 writeln (chr(24), "Untermenue: DISKETTE’); 
1888 writeln (’ ):s 

1818 writeln (1 > Inhaltsverzeichnis’); 

1828 writeln ( ’2 > Datei loeschen’); 

1838 writeln ( ’”3 > Datei umbenennen’); 

1848 writeln ( ’4 > Datei ansehen’); 

1858 writeln (’ '); 

1868 write ( "Bitte Wahl mit Pfeiltasten’,chr(24)); 
1878 FOR i :- 1 TO 18888 DO ; {warten} 

1888 clw (2); 

1898 get (1); 

1188 usewindow (B); 

1118 FOR i := 1 TO 18888 DO ; {warten} 

1128 page 

1138 END. 
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Diesmal beschäftigen wir uns im ersten Teil 


mit der Ausgabe von Zeichen bzw. Texten. Im zweiten 


Teil nutzen wir Firmware-Routinen, mit denen die 
ROMs ein- und ausgeschaltet werden können und 
geben verschiedene Zeichenketten aus, die im ROM 


stehen. Der zweite Teil baut auf dem ersten auf und 


deshalb sollte ersterer nicht überlesen werden. 


Zur Zeichenausgabe auf 
Maschinensprache-Ebene 
gibt es verschiedene Mög- 
lichkeiten. Sinnvoll ist es 
bestimmt, wenn hierzu 
eine im CPC bereits vor- 
handene Firmware-Rou- 
tine benutzt wird, denn 
dann kann man sich die 


Der CPC kann viel mehr, als 
viele Spötter denken. Unsere 
Maschinensprache-Serie soll 
auch Ihnen helfen, den CPC 
besser zu beherrschen 


Programmierung dieses 
Ausgabeteiles sparen. 

Im CPC stehen mehrere 
Routinen zur Verfügung, 
die zur Zeichenausgabe 
eingesetzt werden kön- 


nen: 
&BB5A = TXT OUTPUT 


&BB5SD = TXT WR CHAR 


&BDD3 = TXT WRITE 


CHAR 
&BDD9 = TXT OUT 

ACTION 
Die geläufigste, und für 
unsere Zwecke auch sinn- 
vollste, ist bei &BB5A zu 
finden. Über diese Rou- 
tine können sowohl 
Steuerzeichen als auch 
normale Zeichen ausge- 
geben werden. Außer- 
dem werden durch diese 


Routine keine Register- 
inhalte und auch keine 
Flags verändert! Die Pro- 
grammierung von Zei- 
chenausgaben ist da- 
durch sehr einfach. 

Wer einen Disassembler 
besitzt, sollte bei der 
Adresse &BB5A einmal 
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nachsehen, was dort 
steht. An dieser befin- 
det sich ein sogenannter 
Restart-Befehl. Je nach 
CPC-Typ steht dort: 


RST 1,&9400 (CPC 464) 
RST 1,&93FA (CPC 664) 
RST 1,&93FE (CPC 6128) 


Restarts dienen dazu, 
den Programmablauf zu 
steuern und erweitern da- 
durch den eigentlichen 
Befehlssatz des CPCs. 
Beim RST 1 springt das 


RST1 — SO GANZ 
NEBENBEI ERKLÄRT 


Programm in eine Routi- 
ne im niederwertigen 

16 KB-Bereich. Die ober- 
sten beiden Bit der 
„Restartadresse‘“ geben 
dabei den gewünschten 
ROM-State an. ROM- 
State (Rom-Status) ist 
der ‚„‚Schalt‘-Zustand der 
ROM/RAM-Konfigura- 
tion für das obere und 
untere Firmware-ROM. 
Mit anderen Worten: Mit 
diesen beiden Bit wird 
festgelegt, welches der 
beiden Firmware-ROM- 
Hälften eingeschaltet ist. 
Es können sogar beide 
zugleich sein! Sie wissen 
ja, das Firmware-ROM 
(mit seinen 32 KByte) ist 
in ein unteres und obe- 
res ROM (a 16 KB) auf- 
geteilt. 

Betrachten wir nun die 
obersten Bit der drei 
Restart-Adressen. Um 
herauszufinden, wie der 
ROM-State ist, nehmen 
wir das High-Byte der 
Restart-Adresse und rech- 
nen dieses in die Binär- 
form um. 

Das erste Byte hat (beim 
CPC 464) den Wert 

&94. Diese Zahl in 
Binärform umgerechnet 
ergibt: 10010100. Wer 
es nachrechnen will: 
PRINT BIN$(&94), 
lautet die Umrechnung 
mittels des CPC-Basic. 
Die obersten beiden Bit 
haben also die Folge 
„10“. Gleiches gilt auch 
für &93! Somit ist be- 
reits erkennbar, daß für 
alle drei Restarts die 
RAM/ROM-Konfigura- 39 
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tion „10“ gilt. Gehen wir 
noch einen Schritt wei- 
ter: Analysieren wir 
gleich den Rest der Adres- 
se. Wir nehmen deshalb 
die beiden links stehen- 
den Bit weg, dann ver- 
bleibt als höherwertiges 
er der Binär-Wert 
10100. In hexadezimaler 
Schreibweise ist dies &14. 
Die Einsprungadresse für 
den oben angegebenen 
Restart-Befehl beim CPC 
464 ist also &1400. 

Wer ein ROM-Listing des 
CPC 464 hat, findet un- 
ter dieser Adresse die Rou- 
tine zur Zeichenausgabe. 
Die Besitzer der anderen 
Computer müssen, da 
sich als High-Byte der 
Wert &13 ergibt, bei fol- 
genden Adressen nach- 
sehen: 


CPC 664 — &13FA 
CPC 6128 — &13FE 


Wieder zurück zum ROM- 
State. In allen drei Fäl- 
len sind die oberen bei- 
den Bit „10“. Ohne lange 
zu überlegen, kann des- 
halb festgestellt werden, 
daß bei diesen Restart’s 
ein ROM ein und das an- 
dere ausgeschaltet ist. 
Dabei ist das links stehen- 
de Bit für das obere, das 
rechts stehende für das 
untere ROM zuständig. 
Ein gesetzes Bit bedeu- 
tet ROM gesperrt! Wird 
beim entsprechenden 
CPC eine der oben ange- 
führten Restart-Adressen 
angesprungen, so wird 
das obere ROM gesperrt 
und das untere einge- 
schaltet. 

Der Sinn der Routine, 
auf die von &BBS5A aus 
gesprungen wird, ist im 
Firmware-Handbuch 
nachzulesen, d.h., dort 
sind hierzu die erforder- 
lichen weiteren Angaben 
zu finden: 


Einsprungadresse: 
&BB5A 


Name der Routine: 
TXT OUTPUT 
Funktion: 

Übergebe ein Zeichen 
oder Steuercode an den 
Text-VDU. 

Aktion: 

Gibt Zeichen an den 
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Bildschirm aus und be- 
achtet Controlcodes 
(Zeichen &00 bis &IF). 
Arbeitet auf dem augen- 
blicklich ausgewählten 
Ein-/Ausgabe-Gerät 
(stream). 

Als Einsprungbedingung 
ist angegeben, daß der 
Akkumulator (Register 
A) das auszugebende 
(zu sendende) Zeichen zu 
beinhalten hat. Alle Re- 
gister und Flags bleiben 
erhalten und sind somit 
nach Durchführung der 
Aktion nicht verändert! 
Im Firmware-Handbuch 
können Interessenten 
noch mehr Angaben zu 
diesem Firmware-Ein- 
sprung finden. Für uns 
reichen aber die obigen. 
Wenn wir also Zeichen 
auf Maschinensprache- 
Ebene ausgeben wollen, 
brauchen wir nur das Re- 
gister A mit dem Code 
des entsprechenden Zei- 
chens zu laden und 
durch CALL &BBS5A 
die Ausgabe aufzurufen. 
Sollen mehr Zeichen 
ausgegeben werden, so 
hat sich dieser Vorgang 
eben so oft zu wiederho- 
len, bis alle Zeichen, die 
ausgegeben werden sol- 
len, abgearbeitet sind. 
Betrachten wir aber, da 
alle Theorie grau ist, 
gleich ein praktisches 
Beispiel: 


LD A,&41 (&3E, &41) 
CALL &BB5A 
(&CD, &5A, 
&BB) 
RET (&C9 


Links sehen Sie die mne- 
monische Darstellung 
und rechts in Klammern 
die hexadezimalen Werte 
für dieses Programm. 

Da keine absoluten Adres- 
sen verwendet werden, 
kann diese kleine Routi- 
ne überall im Speicher 
stehen. Sie brauchen also 
lediglich einen entspre- 
chenden Speicherbereich 
für dieses Programm zu 
reservieren (z.B.: 
MEMORY &9FFF) und 
dann diese Werte in die 
darüberliegenden Spei- 
cherstellen zu bringen 
(z.B.: POKE &A000, 
&3E: POKE &A001, 


&41 usw.). Danach kön- 
nen Sie die kleine Routi- 
ne aufrufen (z.B.: CALL 


&A000). Nach diesem Auf- 


ruf wird der Großbuch- 
stabe A an der nächst-- 
möglichen Cursorposition 
ausgegeben. 

Dieses kleine Programm 
ist aber nicht sehr sinnvoll, 
denn wer will schon im- 
mer nur den Buchstaben 
A ausgegeben? Wohl 
kaum jemand, deshalb 
wollen wir nun betrach- 
ten, wie ganze Wörter 
oder Sätze ausgegeben 
werden können. 


VIELE WEGE FÜHREN 
NACH ROM 


Die Zwischenüberschrift 


sagt bereits aus daß es 


nicht eine, sondern viele 
Möglichkeiten gibt, 
Texte von Maschinen- 
sprache aus, auszugeben 
Die am einfachsten ver- 
ständliche wäre, den An- 


fang unseres kleinen Demo- 


programmes immer wieder 
zu wiederholen: Zum 
Beispiel also so: 


LD A,&41 
CALL &BB5A 


LD A, 
CALL &BB5A 
RET 


Diese Routine würde dann 
zwar funktionieren, aber 
es wäre wirklich alles 
sehr, sehr umständlich. 
Günstiger und weitaus 
übersichtlicher ist es, eine 
Tabelle mit dem auszu- 
gebenden Text anzulegen 
und das A-Register zu- 
erst mit dem ersten Zei- 
chen zu laden, um dieses 
dann ausgeben zu lassen, 
dann das zweite Zeichen 
laden usw. 

Um diese Methode anwen- 
den zu können, bedient 
man sich eines Zeigers, 
der immer auf den ent- 
sprechenden Buchstaben 
des Textes „zeigt“. Es 
wird also die Methode an- 
gewandt, die vor allem 
auch bei unseren ersten 
Leseversuchen eingesetzt 
wurde: Der Zeigefinger 
deutet auf den Buchsta- 
ben, der gerade ‚‚bearbei- 
tet‘‘ wird. Als „Maschinen- 
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sprache-Zeigetinger’ Kann 
dabei eines der Doppelre- 
gister des Z80 eingesetzt 
werden, wobei der Inhalt 
des Doppelregisters auf 

die Speicheradresse ‚zeigt‘, 
in welcher sich das gerade 
aktuelle Zeichen befindet. 
Der Begriff „Zeiger“ 
dürfte dadurch eigentlich 
klar sein. 

Welches der Doppelregi- 
ster eingesetzt wird, ist 
dabei prinzipiell egal. 
Verwendet werden kön- 
nen die Doppelregister BC, 
DE und HL. AF ist nicht 
möglich, dain A ja das 
Zeichen stehen soll und 
das F-Register ja die 

Flags beinhaltet! 

Das Laden des A-Registers 
kann dann durch den Be- 
fehl LD A ,(Doppelregister) 
erfolgen. Die Befehlsform 
LD A (..) lädt in A den 
Inhalt der Speicherstelle, 
auf die das Doppelregi- 
ster zeigt. 


Um den Zeiger auf das 
nächste Zeichen wandern 
zu lassen, muß der Wert, 
den das Zeiger-Register- 
paar enthält, nur erhöht 
werden. Hierzu wird am 
besten der Befehl INC 
(INCrementiere = erhöhe) 
verwendet. 
Im nachfolgenden Bei- 
spiel verwenden wir das 
L-Register als Zeiger, 
deshalb muß der ‚‚Erhö- 
hungsbefehl“ INC HL 
lauten. 
Gleich wieder zur Praxis: 


LD HL,TEXTTAB 
LOOP LD a,(HL) 

CALL &BB5A 

INC HL 

JP LOOP 

RET 


TEXTTAB defm 
“Schneider aktiv“ 


Dieses kleine Maschinen- 


programm würde zwar die 
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Zeichenkette “Schneider 
aktiv“ auf den Bildschirm 
ausgeben, aber das ist 
nicht alles, denn es gibt 
keine Abbruch-Bedin- 
gung! Außer dem ge- 
wünschten Text würden 
weitere Zeichen ausge- 
geben werden und zwar 
bis zum „Sankt Nimmer- 
leinstag‘‘. Das HL-Regi- 
ster würde bis zum Wert 
&FFFF erhöht werden 
und dann bei &0000 wie- 
der weitermachen usw. 
In der Zwischenzeit wür- 
den dann alle Zeichen, 
die in den durch HL 
adressierten Speicherstel- 
len stehen, ausgegeben 
werden. 

Das aber wollen wir ja 
gar nicht! Es ist also un- 
bedingt eine Abbruch- 
bedingung in das Pro- 
gramm einzufügen. Auch 
hierfür gibt es verschie- 
denste Möglichkeiten. 
Ein paar davon wollen 
wir nun behandeln und 
die Programme detailliert 
durchsprechen. 


ABBRUCH- 
BEDINGUNGEN 


1. Arbeiten mit dem 
Zähler 

LD HL,TEXTTAB 

LD B,&OF 

LD A,(HL) 

CALL &BB5A 


INC HL 
DJINZ LOOP 
RET 


LOOP 


TEXTTAB defw 
“Schneider aktiv“ 


Bei diesem Programm 
wird zu Beginn das HL-Re- 
gister mit der Adresse ge- 
laden, an welcher das er- 
ste Zeichen des auszu- 
gebenden Textes steht. 
HL zeigt also auf den 
Buchstaben “S‘“. Danach 
folgt der Befehl, in das 
B-Register den Wert 
&OF (dezimal 15) zu 
übernehmen. Diese Zahl 
ist die Anzahl der auszu- 
gebenden Zeichen. Da- 
mit sind die Ausgangsbe- 
dingungen festgelegt. 
Beim Label LOOP folgt 
der Befehl, den Akku 
mit dem Inhalt der Spei- 
cherstelle zu laden, auf 


die das HL-Register zeigt. 
Im A-Register steht des- 
halb nun der Code für 
“S“ Der Aufruf von 
&BBS5A gibt das Zeichen 
am Bildschirm aus. 

Nach Rückkehr von die- 
sem Firmware-Aufruf 
sind alle Register unver- 
ändert. Das gilt also auch 
für das HL-Register, wel- 
ches immer noch auf den 
ersten Buchstaben zeigt. 
Der Befehl INC HL er- 
höht nun den Wert um 
eins, und somit zeigt die- 
ses Registerpaar nun auf 
den zweiten Buchstaben. 
Dann folgt der Befehl 
DJNZ LOOP (dekre- 
mentiere B und springe 
dann, wenn B nicht Null 
enthält, zum Label 
LOOP). Dieser Befehl er- 
niedrigt als erstes also 
den Wert im B-Register. 
Da B den Wert &OF ent- 
hielt, wird dieser nun 
auf &OE erniedrigt. Da 
dieser Wert aber ja nicht 
Null ist, wird beim 

Label LOOP weiterge- 
macht. 

Zu diesem Zeitpunkt 
zeigt HL auf den zwei- 
ten Buchstaben, der 
dann ausgegeben wird. 
Es wird also ein Buch- 
stabe nach dem anderen 
ausgegeben, bis B den 
Inhalt O hat. Ist dies der 
Fall, dann wird nicht 
mehr zum Label LOOP 
gesprungen, sondern 

der Befehl RET ausge- 
führt und zur aufrufen- 
den Routine zurückge- 
kehrt. 


2. Prüfung auf ein 
bestimmtes Zeichen 


LD HLTEXTTAB 
LOOP LD A,(HL) 

CP AD 

JP Z, FERTIG 


CALL &BB5A 
INC HL 


JP LOOP 
FERTIG RET 


TEXTTAB defw 
“Schneider aktiv“:defb 
&00 


Nun können wir uns etwas 
kürzer fassen. HL dient 

als Zeiger auf den Buch- 
staben im Text. Nachdem 
das A-Register mit dem 
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jeweiligen Textzeichen 
geladen wurde, erfolgt 
der Vergleich des Inhal- 
tes mit dem Wert 0 (CP 
= ComPare = vergleiche). 
Da erst am Ende der Text- 
zeichenkette der Wert O0 
auftritt, werden alle Zei- 
chen des Textes ausgege- 
ben. Enthält das A-Regi- 
ster aber diesen Wert, 
dann ist die Zero-Flagge 
durch den Vergleich ge- 
setzt worden und die Be- 
dingung für den Abbruch 
ist erfüllt. JP Z, FERTIG 
(Springe, wenn die Zere- 
Flagge gesetzt ist, zum 
Label Fertig) wird durch- 
geführt und dort steht 
der Befehl RET. 

Der Vergleich muß aber 
nicht unbedingt mit dem 
Wert O erfolgen, auch an- 
dere Werte können einge- 
setzt werden. Manche 
Assembler lassen auch 
den Vergleich mit ASCII- 
Zeichen zu, so daß ein 
Vergleichsbefehl auch 
lauten kann: CP A,“r““. 
In diesem Falle wird die 
Zero-Flagge dann ge- 
setzt, wenn im Akku 

der ASCII-Wert des Zei- 
chens “r‘‘ steht. 

Ich hoffe, daß Sie auch 
bei dieser kleinen Rou- 
tine keine Probleme ha- 
ben, sie zu verstehen. Ob 
Sie alles richtig verstan- 
den haben, können Sie 
aber leicht feststellen: 
Welche Zeichenkette 
wird ausgegeben, wenn 
der Vergleichs-Befehl 

CP A,“v“ lautet? 

Wenn Ihre Antwort 
“Schneider aktiv“ lau- 
tet, dann sollten Sie sich 
das Programm nochmals 
näher ansehen, denn das 
Zeichen ‘v“, wird nicht 
mehr ausgegeben! 

Falls Ihre Antwort rich- 
tig war, dann: Herzlichen 
Glückwunsch, Sie haben 
das Programm vollkom- 
men verstanden. 
Versuchen Sie nun doch, 
das Programm so umzu- 
schreiben, daß trotz des 
Vergleiches auf den Buch- 
staben ‚,‚v“, dieser noch 
ausgegeben und dann erst 
der Programmlauf been- 
det wird! 

Wer die Lösung nicht 
findet, hier ist sie: Der 
Befehl JP Z,FERTIG ist 


> a, 


von seiner ursprünglichen 
Position im Quelltext 

zu entfernen und nach 
dem Aufruf der Routine 
TXT OUTPUT einzuset- 
zen! Da durch die Zeichen- 
ausgabe-Routine keine 
Änderungen an den Regi- 
stern und Flags erfolgten, 
kann der Vergleich also 
auch nach der Zeichen- 
ausgabe durchgeführt 
werden. 


3. Vergleich auf gesetztes 
7. Bit 
Nun eine weitere Varian- 
te für eine Abbruchbe- 
dingung. Beim letzten 
Zeichen wird Bit 7 ge- 
setzt und sobald ein ge- 
setztes 7. Bit erkannt 
wird, wird die normale 
Abarbeitungsschleife ver- 
lassen und zur Beendi- 
gungsroutine gesprungen. 


LD HL,TEXTTAB 
LOOP LD A,(HL) 
CP A,&80 


JP P,FERTIG 
CALL &BB5A 
INC HL 

FERTIGSBC A ,‚&80 
CALL &BBS5A 
RET 


TEXTTAB defw 
“Schneider akti“:defm 
“y“+&80 


Wie Sie an diesem Pro- 
gramm sehen, kann nicht 
nur die Zero-Flagge der 
Auslöser zur Beendigung 
sein, es kann beispiels- 
weise auch die P-Flagge 
(Plus-Flagge) eingesetzt 
werden. Dieses Flag 
(Flagge) kann zu verschie- 
denen Zwecken eingesetzt 
werden. Unter anderem 
dient es auch zur Anzei- 
ge eines Überlaufes und 
der ist bei obigem Ver- 
gleich gegeben. An dieser 
Stelle sei nun wieder ein- 
mal erwähnt, daß wir mit 
unserem Thema Maschi- 
nensprache niemals ein 
gutes Buch über dieses 
Thema ersetzen können 
und wollen. Das ist nicht 
unsere Absicht. Unser 
Bestreben ist es, Anwen- 
dungen aufzeigen und 
vor allem natürlich, wie 
man sinnvoll Programme 
für die CPCs schreibt. 
Deshalb heißt die Artikel- 


SERIE 


folge bei uns auch nicht 
Maschinensprachekurs, 
sondern: Wir programmie- 
ren in Maschinensprache. 
Wem unsere Angaben 
nicht ausreichen, der muß 
in spezieller Literatur 
nachschlagen. Als Emp- 
fehlung für die Maschinen- 
sprache selbst sei hier das 
Buch „Programmierung 
des Z80“ von Rodnay 
Zaks (Sybex-Verlag 

ISBN 3-88745-006-X), 

in der deutschen Überset- 
zung von Bernd Ploss, 
genannt. Zur Erklärung 
zu obigem Programm sei 
nur erwähnt, daß dann, 
wenn die P-Flagge gesetzt 
wird, der Akku-Inhalt um 
&80 vermindert wird und 
erst dann die Ausgabe er- 
folgt. Selbstverständlich 
muß beim letzten Zeichen 
des Textes aber Bit 7 ge- 
setzt sein, sonst klappt es 
nicht. Wie dies bewerk- 
stelligt wird, ist im Bei- 
spiel zu sehen. 

Auch die M-Flagge kann 
beispielsweise als Ende- 
Kriterium dienen, in- 

dem der Vergleichsbefehl 
CP A,&01 lautet und 

der bedingte Sprungbe- 
fehl (also ein von einer 
Bedingung ner 
Sprungbefehl) JPM, 
LABEL lautet. Diese Me- 
thode könnte in unserem 
zweiten Beispiel ange- 
wandt werden! 

Sie sehen, es gibt einige 
Möglichkeiten für den 
Ausstieg aus einer Text- 
ausgabeschleife. Einen 
Teil davon haben wir 
aufgezeigt. In den meisten 
Fällen ist die Abfrage 

auf &00 am einfachsten, 
dann brauchen keine Zei- 
chen gezählt zu werden 
und bei Veränderung 

des Ausgabetextes braucht 
auch der Compare-Befehl 
nicht angepaßt zu werden. 
Damit wollen wir das The- 
ma Zeichenausgabe aber 
noch nicht abschließen, 
denn bisher haben wir 
nur reinen Text, aber 
noch keine Steuerzeichen, 
ausgegeben. Da die Rou- 
tine TXT OUTPUT aber 
auch deren Ausgabe zu- 
läßt, wollen wir als Letz- 
tes auch hierfür ein klei- 
nes Demoprogramm 
schreiben. 


Woran es liegt, wissen wir 
nicht, aber viele Basic-Pro- 
grammierer schrecken im- 
mer davor zurück, Steuer- 
zeichen bei Textausgaben 
einzusetzen. Dabei bie- 
ten die Steuercodes eini- 
ge sehr leistungsfähige 
Möglichkeiten der Beein- 
flussung. Anscheinend 
wird dieses interessante 
Kapitel im Handbuch ein- 
fach immer überlesen. 
Wir wollen nur darauf 


AUCH STEUERZEICHEN 
KÖNNEN ÜBER &BB5A 
AUSGEGEBEN 
WERDEN! 


hinweisen, daß die Steu- 
erzeichen sowohl von 
Basic als auch von Ma- 
schinensprache-Ebene aus 
benutzt werden können. 
Sehen Sie sich also ruhig 
einmal den Abschnitt 
über die Steuercodes in 
Ihrem Handbuch an und 
experimentieren Sie mal 
damit. 

Es geht nicht nur über 
die Sprungtabellen. 

Nun wollen wir uns, wie 
eingangs versprochen, 
mit der Ausgabe von Zei- 
chenketten, die im ROM 
stehen, beschäftigen. 


ROM EIN UND AUS 
Die klare Gliederung der 
CPC-Firmware und deren 
Möglichkeit, über Sprung- 
tabellen auf bereits exi- 
stierende Routinen zu- 
eifen zu können, ist vie- 
en vergleichbaren Com- 
putern gegenüber überle- 
gen. Ein Vorteil dieser 
Struktur ist unter ande- 
rem die Möglichkeit, ohne 
großen Aufwand eigene 
Routinen leicht einbin- 
den zu können. Doch auf 
dieses Thema gehen wir 
erst zu einem späteren 
Zeitpunkt ein. Diesmal 
wollen wir uns mit einem 
„Vorbereitungsthema“ be- 
schäftigen: Wir lesen 
Texte aus dem ROM. 
Um dies tun zu können, 
müssen wir aber die Mög- 
lichkeit haben, diese 
ROMSs, die ja dem RAM- 
Speicher parallel liegen, 
überhaupt einblenden 
zu können. 
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In der Sprungtabelle des 
sogenannten oberen Be- 
triebssystem-Kerns 
(High Kermel), die bei 
&B900 beginnt ‚werden 
uns Routinen, die unseren 
Zwecken dienen können, 
zur Verfügung gestellt. 
Siehe hierzu die Über- 
sicht.. 

Die für unsere derzeiti- 
gen Zwecke benötigten 
Routinen sind: 


KL U ROM ENABLE 
KL U ROM DISABLE 
KLLROM ENABLE 
KLLROM DISABLE 


Zunächst wollen wir uns 
im unteren ROM etwas 
umsehen. Dort stecken 
beispielsweise die Texte 
der Einschaltmeldung, 
die Tabelle der Firmen- 
namen, die Ladefehler- 
meldung, die Kassetten- 
meldungen usw. 


DA SCHAU AN... 


Wußten Sie, daß die Mel- 
dung, die Sie nach dem 
Einschalten eines CPC 
6128 auf dem Bildschirm 
sehen, gar nicht die 
komplette Einschaltmel- 
dung ist? 

Tatsächlich ist der auf 
dem Bildschirm zu lesen- 
de Text nicht mit dem 
identisch, der ausgegeben 
wird. Wenn 6128-Besitzer 
ein gutes Auge haben, 
können diese bei der Mel- 
dungsausgabe erkennen, 
daß sich in der zweiten 
Ausgabezeile kurzzeitig 
etwas ändert. Ab der 
Stelle, wo das Copyright- 
Zeichen ist, steht vorher 
das Wort Copyright! Da- 
mit Sie sich davon überzeu- 
gen können, werden wir 
mittels eines kleinen Pro- 
grammes den Beweis da- 
für antreten. Da die Firm- 
ware zwischen den drei 
CPC-Typen unterschied- 
lich ist, können mit dem 
Programm nur 6128-Be- 
sitzer bedacht werden. 
Die Ausgaberoutine, wel- 
chi die Einschaltmeldung 
für den 464 ausgibt, ist 
anders und einen 664 
haben wir im Moment 
nicht greifbar. Aber nicht 
nur die Ausgaberoutine 


__SEE ip 


ÜBERSICHT DER AB &B900 STEHENDEN SPRUNGTABELLE 


&B900 KL U ROM ENABLE 
&B903 KL U ROM DISABLE 
&B906 KL L ROM ENABLE 
&B909 KL L ROM DISABLE 
&B90C KL L ROM RESTORE 
&B9Y9OF KL L ROM SELECT 
&B912 KL CURR SELECTION 
&B915 KL PROBE ROM 
&B918 KL ROM DESELECT 


&B91B KLLDIR 
&BY1E KLLDDR 


&B921 KL POLL 
SYNCHRONOUS 


Schalte das obere ROM frei 

Sperre das obere ROM 

Schalte das untere ROM frei 

Sperre das untere ROM 

Stelle den vorherigen ROM-State her 
Selektiere ein bestimmtes oberes ROM 
Welches obere ROM ist selektiert? 
Frage nach Klasse und ROM-Version 


Stelle die vorherige obere ROM-Auswahl 


wieder her 

Verschiebe Speicherplatz (LDIR) mit 
ausgeschalteten ROM’s 

Verschiebe Speicherplatz (LDDR) mit 
ausgeschalteten ROM’s 


Prüfe, ob ein Ereignis mit höherer Priorität 


als das momentane ansteht. 


ROM-ADRESSEN VERSCHIEDENER MELDUNGEN 


CPC 464 


Einschaltmeldung 
Ladefehler-Meldung 
Firmennamen 
Kassetten-Meldung 


ARNOR 288 ASSEMBLER version 1.14 


AS78 (B996) LROME 
AS78 (B999) LROMD 
A578 19688) EIN 

AS78 (BBSA) ZOUT 


(A999) 


CD 96 B9 
21 88 96 


09917 
09818 FERTIG 
09919 


Errors: 000908 Warnings: 88908 


CPC 664 CPC 6128 


&066D — &06E7 &066E — &06EE &0688 — &O6F8 
&06F4 — &0711 &O6F5 — &0712 &0705 — &0722 
&0727 — &0774 &0728 — &0775 &0738 — &0785 
&27C5 — &2835 &2935 — &29A5 &2935 — &29A5 
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&B986 jUnteres ROM einschalten 
&B989 Unteres ROM ausschalten 
40688 jEinschaltmeldung 6128 

&BBSA jZeichenausgabe-Routine 


LROME 5;LOW-ROM einschalten 
HL,EIN ;Zeiger auf Meldungstext 


‚A, (HL) }jZeichen holen 


A,8 Ende der Zeichenkette? 
Z,FERTIG sJa 

ZOUT ;Zeichen ausgeben, 

HL Zeiger erhoehen 
WEITER jweitermachen 


LROND junteres ROM ausschalten 
;Fertig 


Assemblerlisting: Ausgabe der Einschaltmeldung beim CPC 6128 


bei den CPC-Typen ist 
anders, auch die Texte 
stehen an anderen ROM- 
Speicherstellen. (Siehe 
hierzu Aufstellung: ROM- 


Adressen verschiedener 
Meldungen.) 

Die CPC 6128-Besitzer 
finden ein kommentiertes 
Assemblerlisting zur Aus- 


gabe der Einschaltmel- 


dung abgedruckt und kön- 
nen dieses entweder mit 
einem Assembler umset- 
zen lassen, oder die Werte 
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| _ aktiv 


direkt poken (Wie das 
geht, haben wir schon 
mehrfach geschrieben!) 
Um den Effekt deutlich 
werden zu lassen, emp- 
fiehlt sich das folgen e 
kleine Basiclisting: 


10 MODE I 
20 CALL &A000 
30 GOTO 20 


(Daß das Maschinenpro- 
gramm vorhanden sein 
muß, versteht sich von 
selbst!) 

Sollen andere Meldun- 
gen ausgegeben werden, 
dann muß dem HL-Regi- 
ster in den Speicherstel- 
len &A004 (LOW-Byte) 
und &A005 (High-Byte) 
der entsprechende 
Adresswert mitgeteilt 
werden. Auch die 
Besitzer der anderen 
CPCs können mit diesem 
Programm arbeiten. Auch 
dann gilt: Adresse für 
HL anpassen. Sollen 
Texte aus dem oberen 
ROM-Teil ausgegeben 
werden, dann sind die 
beiden Routinen zum 
Ein-/Ausschalten gegen 
die Routinen auszutau- 
schen, die für das obere 
ROM zuständig sind. 
Das Thema ‚‚Textausga- 
be aus dem ROM- und 
RAM-Speicherstellen‘“ 
ist damit beendet. 

Daß mit dieser Methode 
die ROM-Speicherstel- 
len auch ausgelesen 
werden können, sei nur 
deswegen erwähnt, da- 
mit Sie die Information 
erhalten, daß Schreib- 
zugriffe immer mit 

dem RAM arbeiten. 
Einige Bemerkungen 
noch zum Schluß: 

Da das Programm so kurz 
ist, haben wir diesmal 
kein Ladeprogramm ab- 
gedruckt und hoffen, daß 
Sie trotzdem keine Pro- 
bleme haben. Falls Sie 
anstelle der Zeichenaus- 
gabe über &BBS5SA die Rou- 
tine &BBSD verwenden 
wollen, dann denken Sie 
bitte daran, daß die 
Registerinhalte nicht er- 
halten bleiben und des- 
halb gerettet werden 
müssen (PUSH und POP). 
Viel Spaß beim Experi- 
mentieren! LM 


LISTING 


BENZIN 
KOSTEN 


Wem geht es nicht immer wieder so wie den meisten 
Autofahrern: spätestens beim Tanken fragt man sich 
immer wieder, wie hoch eigentlich die Benzinkosten 
für den fahrbaren Untersatz sind und wieviel Sprit 
das Auto auf 100 km verbraucht. 

Dazu hat unser Autor Heinz Neuer nun ein komfor- 
tables Programm geschrieben, das auf allen CPCs 
läuft. Als zusätzliche Hardware benötigen Sie noch 
einen Drucker dazu. 

Das Programm ist voll menügesteuert und einfach 

zu handhaben. Es verfügt über Sicherheitsabfragen, 
damit Sie fehlerhafte Eingaben rechtzeitig korrigie- 
ren können. Wenn Sie das Programm während des 
Laufens mit der ESC-Taste abbrechen, können Sie 
nach Drücken der TAB-Taste wieder ins Menü zurück- 
kehren. Außerdem ist eine Fehlerroutine eingebaut, 
so daß eigentlich nichts mehr schieflaufen dürfte. 


DIE MENÜPUNKTE 


Nach dem Erscheinen des Menüs haben Sie die Mög- 

lichkeit, zwischen folgenden Programmpunkten zu 

wählen: 

<1> Eingabe 

Unter diesem Menüpunkt werden Sie vom Programm 


BENZINKOSTEN FüR 197937 


NR. DATUM TACHOSTAND FAHRSTRECKE LITER PREIS DURCHSCHNITT 

1. 15.12.86 13171.7 

2. 08.01.87 13820.0 648.3 50.01 45.46 7.71 

3. 21.01.87 14345.2 525.2 46.30 42.55 8.82 

4. 02.02.87 14910.9 565.7 44.84 41.21 7.93 

5. 11.02.87 15468.3 357.4 42.75 38.00 7.67 

6. 25.02.87 16065.8 597.5 43.89 39.90 7.35 

7. 01.03.87 16569.0 503.2 41.25 37.20 8.20 
SUMME : 3397.3 269.04 244.32 7.92 


aufgefordert, das Datum des Tankens, den Tachostand, 
die getankte Benzinmenge und den Gesamtpreis einzu- 
geben. Nach Bestätigung der richtigen Eingabe wer- 
den diese Daten automatisch abgespeichert. 
Bei der erstmaligen Anwendung des Programms wer- 
den jedoch nur der Kilometerstand und das Datum 
abgefragt, da diese Werte dann als Startwerte für 
alle nachfolgenden Eingaben dienen. 


<2> Gesamtliste 


Rufen Sie diesen Menüpunkt auf, so wird automatisch 
die Datei „Benzin87.dat‘‘ geladen, falls bereits Daten 


Bitte lesen Sie weiter auf Seite 70 


LISTING 


5 UBEIETETEIETESETETESESE TEE IE SEHE TE HEERES SE IE IE 


10 ”#* BENZINKOSTEMVERWALTUNG * 
20 ’# VON = 
25 ’%# HEINZ NEUER * 
30 °’# FUER = 
35 ’# SCHNEIDER AKTIV * 
a0 ’* CPCG 464/664/6128 je* 


SO EHER 
60 

70 MODE 2:BORDER 10 

80 OPENOUT "DUMMY” :CLOSEOUT 
90 DT$="BENZINB7.DAT" ee 
ESZAHL HIER [ NDERN 

100 ” 

110 ” UMLAUTE 

120 ° 

130 SYMBOL 
140 SYMBOL 
‚102,0 

150 SYMBOL 
08,56,0 
160 SYMBOL 
‚60,0 

170 SYMBOL 
118,0 

180 SYMBOL 
60,0 

190 SYMBOL 
‚62,0 

200 SYMBOL 
18, 108,96 
210 

220 ” WINDOWS 

230 ” 

240 WINDOW#0,1,80,5,22:WINDOWf#1,1,8 
0,1,5:WINDOW#2,2,79,2,3 

250 WINDOW#4,1,80,23,25:WINDOW#S,2, 
79,24,24:WINDOW#6,72,79,3,3 

260 PRINT#1,CHR$( 150) ;STRING$( 78, 15 
4) ;CHA$( 156) ; 

270 PRINT#1,CHR$( 149) ; TAB( 80) ;CHR$( 
149) ;CHA$( 149) ; TAB( 80) ;CHR$( 149) ; 
280 PAINT#1,CHR$( 147) ;STRING$( 78, 15 
4) ;CHR$( 153) 

290 PRINT#4,CHRA$( 150) ;STRING$( 78, 15 
4) ;CHA$( 156) ; 

300 PRINT#4,CHR$( 149) ;TAB( 80) ;CHA$( 
149); 

310 PRINT#4,CHR$( 147) ;STRING$( 78, 15 
4) ;CHR$( 153) ; 

320 

330 ” DIMENSIONIERUNG / ETC. 

340 ’ 

350 I$=CHA$( 24) 

360 DIM DAT$(50) ‚KM( 50) ‚,L(50) ‚DM( 50 
) 
370 


JAHR 


AFTER 90 
91,90,60, 102,102, 126, 102 


92,186, 108, 198, 198, 198, 1 
93, 102,0, 102,102, 102,102 
123,72,0,120,12,124,204, 
124,36,0,60, 102,102, 102, 
125,68,0, 102, 102, 102, 102 


126,56, 108, 108, 108, 102, 1 


I=1:S5UMKM=0 : SUML=D : SUMDM=O 

380 ON ERROR GOTO 1430 

390 KEY 159, "CLS5:60T0 380”+CHR$( 13) 
A00 KEY DEF 68,0, 159 


410 ” 

420 ” MENUE 

430 ° 

440 SOUND 1,50,20,15 

450 CLS:CLS#5:CL5#2:PARINT#2,TAB(2); 
I$;"BENZINKOSTEN";" 19 
"+MID$CDT$,7,2);” ”";I$; TAB(58) ;CHR$ 
(164);* by ";I$;”" Ne”;I$;"5 

OFT - 02.87" 

460 FOR T=28 TO 20 STEP -1:PLOT 150 
-T, 150-T:DRAW 500+T, 150-T:DRAW 500+ 
T,300+T:DRAW 150-T,300+T:DRAW 150-T 
‚150-T:NEXT 


470 LOCATE 30,4:PRINT"EINGABE 
(1)" 
480 LOCATE 30,6:PARINT"GESAMTLISTE 
(2)” 
490 LOCATE 30,8:PRINT"EINZELDRUCK 
(3)” 
500 LOCATE 30, 10:PAINT"PROGRAMMENDE 
(4)” 
510 PRINT#5,"” >>>>> ";I$;” BITTE W 
HLEN ";I$; TAB( 40) ">>>>> NACH ";I$;” 
BREAK ";I$;" MIT ";I$;"” TAB ";I$;” 
INS MENUE" 
520 A$=INKEY$ 
530 ON VAL(A$) GOTO 590,960, 1460, 13 
80 
540 EIN,GES,EINZ,EN 
DE 
550 GOTO 520 
560 
570 ”° EINGABE 
580 
590 INK 2,18:CL545:LOCATE 28,4:PRIN 


T CHR$( 243) :PEN 2:LOCATE 30,4:PRINT 
CHR$( 22) CHR$( 1) STARING$( 11,207) CHR$ 
( 22) CHR$( 0) :PEN 1 

600 IF N>O THEN 660 

610 IF N=0 THEN CLS#5:PRINT#5,"” >>> 
>> ";1$;” WIRKLICH NEUE LISTE ANLEG 
EN ? ";I$;” (J/N) >>>>> 65 

ONST OPTION (2)” 

620 A$=UPPER$( INKEY$) :IF A$="" THEN 
620 

630 
640 

650 


IF A$="N” THEN 430 

IF A$="J" THEN 660 

GOTO 620 

660 CLS#5:CL5:N=N+1 

670 FOR T=24 TO 20 STEP-1:PLOT 150- 
T, 150-T:DRAW 500+T, 150-T:DRAW 500+T 
‚300+T:DAAW 150-T,300+T:DRAW 150-T, 
150-T:NEXT 

680 PRINT#S,USING " >>>>> ##. EINTR 
AG";N:LOCATE 25,4:INPUT "DATUM (##. 


#H.AAH): ”,DAT$CI) 
690 LOCATE 25,6:INPUT "TACHOSTAND 
: ",.KMCI) 


700 IF N=1 THEN 800 
710 LOCATE 25,8:INPUT "LITER 
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: ",L(I) 
720 LOCATE 25, 10:INPUT"PREIS 
: ",DM(I) 

730 PRINT#5,"” >>>>> ";1$;" EINGABEN 

RICHTIG ? ";1$;” (J/N)"” 

740 A$-UPPER$[ INKEY$) :IF A$-"" THEN 

740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 CLS#5:PRINT#5," >>>>> ";1$;" DA 
TEN WERDEN GESPEICHERT ";I$ 

850 DPENOUT DT$ 

860 WRITE#9,N,SUML ‚ SUMDM 


IF A$="N" THEN CLS:60TO 670 
IF A$<>"N” THEN 780 

GOTO 740 

SUML=SUML+L(I) 
SUMDM=SUMDM+DM( I) 

SOUND 1,50,20,15 


* SPEICHERN 


870 FOR I=1 TON 

880 WRITE#9,DAT$CI),KMCI),L(CI),DMCI 
) 

890 NEXT 

900 CLOSEOUT 

910 DATBAK$=LEFT$EDT$,8B) +" .BAK”" 


920 lERA,DATBAK$ "fuer 664/6128 

921 ’IERA,@DATBAK$ fuer 464 rem-Zei 
chen entfernen und Zeile 920 mit re 

m-Zeichen versehen 

930 SOUND 1,50,20, 15 

940 GOTO A430 

950 

960 ’ LADEN 

970 5 

980 INK 2,18:CL545:LOCATE 28,6:PRIN 
T CHR$( 243) :PEN 2:LOCATE 30,6:PRINT 
CHR$( 22) CHR$C 1) STRING$( 11,207) CHR$ 
( 22)CHR$(0) :PEN 1 

990 DPENIN DT$ 

1000 INPUT#9,N,SUML , SUMDM 

1010 IF N=1 THEN CLOSEIN:CLS#5 : SDUN 

D 1,50,300, 15:PRINT#5," >>>>> ";1$; 
* BISHER NUR STARTEINTRAG VORHANDEN 
"-I$:FOR W=1 TO 3000:NEXT: 

GOTO 430 

1020 CLS#5:PRINT#5,” >>>>> ";1I$;"” A 

USDRUCK ? ";1$;" (YJ/N)” 

1030 DRU$=UPPER$( INKEY$) 

1040 IF DRU$="" THEN 1030 

1050 IF DRU$="4" THEN DRU=-8:CLS:CLS 

#5:G0OTO 1080 

1060 IF DRU$<>"J" THEN DRU=-0:CL5:CL 

S#45:GOTO 1130 

1070 GOTO 1030 

1080 DR=VAL( MID$C BIN$( INP( EFS00) ,B) 
‚2,9))-1 

1090 IF DA THEN CLS#5:PRINT45,"” >>> 

>> ";1I$;"” AUSDRUCK ";I$ ELSE CLS5#5 
:PAINT#5,"” >>>>> ";1$;" DRUCKER NIC 


HT BEREIT ";I$:50UND 1,50,5 
0,15:DARU=0:60T0 1140 

1100 TIT$="BENZINKOSTEN FJAR 19"+MID 
$C0T$,7,2) 

1110 IF DRU-8 THEN PRINT#B,CHA$( 14) 
; TAB( 10) TIT$:PAINT#8:PRINT#B8 

1120 IF DRU-B THEN PRINT#B,TAB(2) "N 
A.”; TAB( 9) "DATUM" ; TAB( 18) " TACHOSTAN 
D" ; TAB( 32) "FAHRSTRECKE" ; TAB( 47) "LIT 
ER"; TAB( 56) "PREIS" ; TAB( 65) ” 
DURCHSCHNITT” :PRINT#B, CHR$C 27) CHA$( 
45) CHA$( 1) ;STAING$( 80, 95) ; CHR$( 27) C 
HA$( 45) CHR$( 0) :PRINT#B 

1130 CLS#2:CL5:PRINT#2:PRINT#2, TAB( 
2) "NR.”; TAB( 9) "DATUM"; TAB( 18) "TACHO 
STAND" ; TAB( 32) "FAHRSTRECKE" ; TAB( 47) 
"LITER" ; TAB( 56) "PREIS" ; TAB( 

65) "DURCHSCHNITT" 

1140 FOR I=1 TO N 

1150 INPUT#9,DAT$CI),KM(I),L(I),DM( 
I) 

1160 KM=KM( I) -KM( I-1) 

1170 IF DAU=8 AND I=1 THEN PRINT#B, 
TAB( 1) USING" #4.” ; 1; :PRINT#8, TAB( 7)D 
AT$(I); :PRINT#B, TABL 20) USING "AHHHH 
.#";KMÜI) 

1180 IF I=1 THEN PRINT TAB( 3) USING” 
##.”";1;:PRINT TAB(9) DAT$( I); :PRINT 
TAB( 21) USING "AHHHH.#” ;KMCI) :GOTO 

1250 

1190 DUR=( L( I)*100) /KM 

1200 PRINT TAB( 3) USING”##.";1I;:PRIN 
T TAB(9) DAT$(I);:PRINT TAB(21)USIN 
G "HHHHR.H"SKMCT);:PRINT TAB 35) USI 
NG"AHHR.#" KM; :PRINT TAB( 46 
J)USING"AAHA. 44” SLOT) ;:PAINT TAB(55) 
USING" AHHH. HH” SOME); 

1210 IF DRU=8 THEN PRINT#8,TAB( 1)US 
ING”#4#."; 1; :PRINT#8, TAB( 7)DAT$CI);: 
PRINT#B, TABL 20) USING" HAHHH. 4” ;KMCT) 
; :PRINT#B, TAB( 34) USING" AHAH 

.#” ;KM; :PARINT#B, TAB( 45) USING HHHH -# 
#”;L(0T); 

1220 IF DRU-8 THEN PRINT#8B,TAB(54)U 
SING” A#HHH. 44” ;DMCIL) ; :PRINT#8, TAB( 68 
JUSING"#A.44#” ;DUR 

1230 PRINT TAB( 69) USING "##.#4#” ;DUR 
1240 IF I MOD 18=0 THEN CLS#5:PRINT 
#5,” >>>>> ";1I$;"” TASTE ";I$:CALL & 
BB18:CLS 

1250 NEXT 

1260 CLOSEIN 

1270 PRINT TAB( 3) STAING$( 75, 154) 
1280 IF DRU=8 THEN PRINT#8,CHR$( 27) 
CHR$( 45) CHA$( 1) ;STARING$( 80,95) ;CHR$ 
( 27) CHR$( 45) CHA$( 0) :PRINT#B 

1290 SUMKM=KM( N) -KM( 1) 

1300 SUMDUR=( SUML*100) /SUMKM 

1310 PRINT TAB(9);I$;” SUMME: ";I$; 
:PAINT TAB( 34) USING "AHHHH. #” ; SUMKM 


————————————————————————————————————————————————— 
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;:PRINT TAB( 46) USING" A#HHH . #4” ; SUML; 
:PAINT TAB( SS) USING" AHHH HH 
";S5UMDM; :PAINT TAB( 69) USING" A#.##”; 
SUMDUR 
1320 IF DAU=-8 THEN PRINT#8,TAB( 7) "5 
UMME :"; :PRINT#8,TAB( 33) USING "AH 
"- SUMKM; :PAINT ” 
Y,n puma; : PRINTFB TAG BJUSING ui 
)USING”AAH#: #4” ;SUMDM; : PAINT#B, TAB( 
68) USING” ##.4#4#” ; SUMDUR; :PRINT#8, CHR 
$C 12); 
1330 PRINT$S," >>>>> ";I$;" TASTE "” 
;I$:CALL &BBO6 
1340 GOTO 430 
1350 
1360 ° PROGRAMMENDE 
1370 
1380 INK 2,18:CL5#5:LOCATE 28, 10:PR 
INT CHA$( 243) :PEN 2:LOCATE 30, 10:PR 
INT CHR$( 22) CHA$( 1) STRING$( 12,207) CC 
HA$( 22) CHR$( 0) :PEN 1 
1390 X=0:PRINT#5,”" >>>>> IN CA. 10 
SEKUNDEN ERFOLGT ";I$;” RESET ";I$; 
:WHILE X<36:PAINTFS,CHR$( 144) ; :X=X+ 
1:50UND 1,50, 10,15:FOR W=1 
TO 300:NEXT:WEND:CALL O 
1400 ° 
1410 ° FEHLERROUTINE 
1420 ° 
1430 IF ERA=32 THEN CLS:CL5#5:PRINT 
#5,” >>>>> ";I$;” DATEI NICHT VORHA 
NDEN ";I$:50UND 1,50,300,15:FOR W=1 
TO 3000:NEXT:RESUME 430 
1440 CLS:CLS#5:PRINT#S," >>>>> ";I$ 
;" PROGRAMMFEHLER ";I$;ERR;" IN ";E 
AL:SOUND 1,50,300, 15:FOR W=1 TO 300 
O:NEXT:RESUME 430 
1450 
1460 *° EINZELDRUCK 
1470 ° 
1480 INK 2,18:CL5#5:LOCATE 28,8:PRI 
NT CHR$( 243) :PEN 2:LOCATE 30,8:PRIN 
T CHR$( 22) CHA$( 1) STRING$( 11,207) CHR 
$( 22) CHA$( 0) :PEN 1 
1490 DR=VAL( MID$( BIN$( INP( EF500) ‚8) 
‚2,0)-1 
1500 IF DA THEN DRU-8:CL5#5:PRINT#S 
„" >>>>> ":1$;" AUSDRAUCK "”;I$;TAB(A 
6)" >>>>> ";1$;" DRUCKER AUF BLATTA 
NFANG ";I$ ELSE CLS#5:PRINT 
#5," >>>>> ";I$;" DRUCKER NICHT BER 
EIT ";I$:SOUND 1,50,50, 15:DAU=0:60T 
D 1510 
1510 OPENIN DT$ 
1520 INPUT#9,N,SUML , SUMDM 
1530 IF N=1 THEN CLOSEIN:CLS#S :50UN 
D 1,50,300, 15:PRINT4#5,” >>>>> ";I$; 
" BISHER NUR STARTEINTRAAG VORHANDEN 
":I$:FOR W-1 TO 3000:NEXT: 
GOTO 430 


1540 TIT$="BENZINKOSTEN F]JR 19”+MID 
$CDT$,7,2) 

1550 IF DRU=8 AND N=1 THEN PRINT#B, 
CHRA$( 14) ; TAB( 10) TIT$:PRINT#8: PAINT# 
8 


1560 CLS#2:CL5:PRINT#2:PRINT#2,TAB( 
2) "NA.”; TAB(9) "DATUM" ; TAB( 18) "TACHO 
STAND" ; TAB( 32) "FAHRSTRECKE" ; TAB( 47) 
"LITER" ; TAB( 56) "PREIS" ; TAB( 

65) "DURCHSCHNITT" 

1570 IF DRU=8 AND N=1 THEN PRINT#B, 
TAB( 2) "NA." ; TAB( 9) "DATUM" ; TAB( 18) "T 
ACHOSTAND*® ; TAB( 32) "FAHRSTRECKE” ; TAB 
(47) "LITER" ; TAB( 56) "PREIS"; 

TAB( 65) "DURCHSCHNITT" :PARINT#8 , CHA$( 
27) CHR$( 45) CHR$( 1) ; STRING$( 80,95) ;C 
HA$( 27) CHA$( 45) CHR$( 0) :PAINT#B 

1580 FOR I=1 TO N 

1590 INPUT#9,DAT$CI),KMCI),L(I),DM( 
I) 

1600 KM=KM( I) -KM( I-1) 

1610 IF DRU=8 AND N=1 THEN PRINT#B8, 
TAB( 1) USING” ##."; I; :PRINT#8, TAB( 7)D 
AT$CI); :PAINT#8,TAB(20)USING "HAM 
-#" ;KMCI) 

1620 IF I=1 THEN PRINT TAB( 3) USING” 
##.";1;:PRINT TAB(9) DATS$SCI); :PRINT 
TAB( 21) USING "HAHHH.#” ;KMCI) :GOTO 

1690 

1630 DUR=(L( I) *100) /KM 

1640 PRINT TAB( 3) USING”##."”;I; :PRIN 
T TAB(9) DAT$(I); :PRINT TAB(21)USIN 
G "AHA." ;KMCI);:PARINT TAB( 35) USI 
NG" A#HAHH.#”;KM; :PAINT TAB( 46 
)USING"AHH#H. #4” ;LCI);:PAINT TAB(55) 

USING” AAHH.#A”,ODMCI); 

1650 IF DRU=8 AND I=N THEN FOR V6-0 
TO N+4:PRINT#8:NEXT:PRINT#8,TAB( 1) 
USING”##.";1; :PRINT#8,TAB( 7) DAT$(I) 
; :PAINT#8, TAB( 20) USING" AAHH 

#.4#” ;KM(I) ; :PAINT#8, TAB( 34) USING” ## 

#4 .#” ;KM; :PAINT#B, TAB( 45) USING" AAHH 
HH”; LI); 

1660 IF DRU-8 AND I=-N THEN PRINT#B, 
TAB( 54) USING” A#HHH . #4” ;DMCI) ; :PRINT# 

8, TAB( 68) USING” ##.4#4#” ;DUR 

1670 PRINT TAB( 69) USING "##.#4” ;DUR 
1680 IF I MOD 18-0 THEN CLS5#5:PRINT 

#5," >>>>> ";I$;" TASTE ";I$:CALL & 

BB18:CL5 

1690 NEXT 

1700 CLOSEIN 

1710 PAINT TAB( 3) STAING$( 75, 154) 
1720 SUMKM=KM( N) -KM( 1) 

1730 SUMDURA=( SUML#100) /SUMKM 

1740 PRINT TAB(9);I$;"” SUMME: ";I$; 
:PRINT TAB( 34) USING "AAAHH.#” ; SUMKM 
;:PRINT TAB( 46) USING" AHAH#. #4” ; SUML; 

:PRINT TAB( 55) USING" HAAR HA 


":SUMDM; :PRINT TAB( 69) USING"##.##"; 30 
69 


% AN SSTe: 


SUMDUR 

1750 CLS#S:PRINT#S," >>>>> ";1$;" 6 
UMME DRUCKEN ? ";1I$;" (J/N)" 

1760 ED$=UPPER$( INKEY$) :IF ED$="" T 
HEN 1760 

1770 IF ED$-"J" THEN ED-1:60T0 1800 
1780 IF ED$<>"J" THEN ED-0:60T0 183 


0 

1790 GOTO 1760 

1800 IF DRU=8 AND ED=1 THEN PRINT#8 
‚ CHR$C 27) CHR$L 45) CHR$C 1) ;STRING$( 80 
‚95) ;CHA$[ 27) CHR$L[ 45) CHR$( 0) :PRINTA 
8 


1810 IF DRU=8 AND ED=1 THEN PRINT#B 
‚TAB( 7) "SUMME :"; :PAINT#8,TAB( 33) US 
ING "###H# .#" ;SUMKM; :PRINT#B, TAB( 45 
) USING" #### #4" ;SUML; : PRINT 

#8 , TAB( 54) USING" #### . #4” ; SUMDM; :PRI 
NT#8, TAB( 68) USING” ##. #4” ; SUMDUR; :PR 
INT#8,CHR$( 12) ; 

1820 PRINT#S," >>>>> ";I$;"” TASTE " 
;I$:CALL &BBO6 

1830 GOTO 430 

1840 ’ 


Fortsetzung von Seite 66 


vorhanden sind. Danach können Sie sich auf dem 
Bildschirm oder wahlweise auch auf dem Drucker 

die bereits vorhandenen Daten ansehen ‚beziehungs- 
weise ausgeben lassen. 

Diese Daten werden folgendermaßen ausgegeben: 
Lfd. Nr., Datum des Tankens, jeweiliger Tachostand, 
Fahrtstrecke, getankte Literzahl, der Preis sowie der 
durchschnittliche Benzinverbrauch. 

Am Schluß werden dann automatisch auch die Sum- 
men für die gefahrenen Kilometer, die getankten Liter 
und der Preis ausgegeben. Außerdem wird auch noch 
der Durchschnittsverbrauch über alle zurückgelegten 
Strecken berechnet. Damit haben Sie dann auch 

noch die Möglichkeit, Ihren Benzinverbrauch laufend 
zu beobachten und eventuellen stärkeren Schwankun- 
gen nachzugehen. Manchmal deutet ja ein ungewöhn- 
licher Anstieg des Durchschnittsverbrauchs auf Män- 
gel bei Ihrem Fahrzeug hin. 


<3> Einzeldruck 

Hier können Sie sich immer den letzten Eintrag in 
Ihrer Datei ausdrucken lassen. Dazu muß das Papier 
immer auf den Anfang (genau!) eingespannt werden. 
Beim ersten Eintrag wird dann die Kopfzeile gedruckt, 
bei den weiteren Eintragungen jeweils die letzte Ein- 
gabe, wobei das Papier automatisch auf die entspre- 
chende Position vorgeschoben wird. 

Nach dem letzten Eintrag (zum Beispiel am Jahres- 
sn) können Sie sich auch die Summen ausdrucken 
assen. 


<4> Programmende 

Wird dieser Programmpunkt aufgerufen, so wird Ihr 
Rechner nach cirka 10 Sekunden mit einem System- 
reset zurückgesetzt. Innerhalb dieser Zeit können 
Sie mit einem Break das Programm abbrechen und 
mit der Tab-Taste dann wieder ins Menü zurück- 
kehren. (JE) 


HYVPER- 
ATTACK 


Bei diesem Programm unseres Autors Marco Jedam- 
ski handelt es sich um ein reines Action-Game, das 
im Wettkampf um Punkte allein oder mit bis zu drei 
Mitspielern gespielt werden kann. Da drei Levels vor- 
handen sind, kann man sich die gewünschte Spiel- 
schwierigkeit selbst auswählen. 

Im Ladeprogramm ist eine Spielanleitung enthalten. 
Man kann wählen, ob man diese lesen oder gleich mit 
dem Spielen anfangen will. Bevor dann das Hauptpro- 
gramm geladen wird, ertönt noch eine kleine Melodie. 
Zu Beginn des Spiels wird nach der Spielerzahl, Spiel- 
level und nach den Namen des (der) Spieler(s) gefragt. 
Eine Fehleingabe ist durch das Programm ausge- 
schlossen. 


AUSSERIRDISCHE GREIFEN AN 


Sie sind mit Ihrem hypermodernen Verteidigungsab- 
fangjäger in einem unterirdischen Tunnel. Und in die- 
sem Tunnel befinden sich die Außerirdischen, die die 
Erde unterjochen wollen. Ihre Mission besteht nun 
darin, diese Gegner zu vernichten, die sich Ihnen in 
den Weg stellen. Dazu haben Sie nur begrenzte Zeit 


zur Verfügung. Damit man die Rest-Zeit, die noch ver- 
bleibt, erkennen kann, hat der Autor einen entspre- 
chenden Rem-Hinweis im Listing vermerkt. Wird hier 
das Rem-Zeichen entfernt, so wird die Restzeit ange- 
zeigt. Der Autor weist allerdings darauf hin, daß da- 
durch das Spiel an Schnelligkeit verliert. Die Entschei- 
dung, dieses Rem-Zeichen zu entfernen oder nicht, 
liegt bei Ihnen. 


MIT HIGH-SCORE-TABELLE 


Am Ende des Spieles erscheint eine Highscore-Tabelle 
mit den besten Tagesergebnissen. Diese sind nach dem 
Bubble-Sort-Verfahren vorher sortiert worden. Das 
Spiel wird mit dem Joystick gespielt und läuft auf al- 
len ‚CPC-Typen. 

Der Bildaufbau unmittelbar vor dem Spielbeginn 
dauert einige Sekunden. Werden Sie also nciht unru- 
hig, der Rechner ist nicht abgestürzt! Viel Spaß beim 
Spielen, retten Sie die Erde mit Ihrem Jäger. (JE) 
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10 RR SHH UT SE ISHE 
20 ’#* HYPER ATTACK - LOADER *# 
30 ’# VON * 
a0 '* MARCO JEDAMSKI * 
so ’# FUER * 
80 ’* SCHNEIDER AKTIV * 
70 '# CPC 464/664/6128 je* 
BO RR 


90 
100 MODE 1:CALL &BC02:CALL EBBAE:CA 
LL &BBOO 

110 GOSUB 750 
120 
130 
140 


"MCODE UND EYMBOLSE 
"TITELBILD UND -MUSIK 
INK 0,0:PAPER 0 
INK 1,2:INK 2,24 
150 INK 4,9,18:INK 5,18,9:INK 6,12: 
INK 7,13:INK 8,24, 15:INK 9,25:INK 1 
0,0:INK 11,26,0:INK 12,6:INK 13,8:1 
NK 14,7:INK 15,18 
160 BORDER 0 
170 FOR i-1 TO 10 STEP 3:0AIGIN i,- 
i 
180 PLOT 40,380,i:DRAW 40,340: PLOT 
40,360:DRAW 60,360:PLOT 60,340:DRAW 
60,380:PLOT 80,380:DRAAW 80, 360:DAA 
W 100,360:DRAW 100,380:PLOT 90,360: 
DRAW 90,340:PLOT 120,340:DRAAW 120,3 
80:DRAW 140,380:DRAW 140,360 
190 DRAW 120,360:PLOT 180, 380:DRAW 
160, 380:DRAW 160, 340:DRAW 180, 340:P 
LOT 160,360:DRAW 170,360:PLOT 200,3 
40:DRAW 200, 380:DRAW 220,380:DRAW 2 
20,360:DRAW 200, 360:DRAW 220, 340:PL 
0T 250,260,i+1:DRAAW 250,300 
200 DRAW 270,300:DRAW 270, 260:PLOT 
270,280:DRAW 250,280:PLOT 290, 260:D 
RAW 290,300:PLOT 270,300:DRAW 350,3 
00:PLOT 320,260:DRAW 320,300:PLOT 3 
50,260:DRAW 350, 300:DRAW 370, 300:DR 
AW 370,260:PLOT 370,280 
210 DRAW 350,280:PLOT 410,260:DRAW 
390,260:DRAW 390, 300:DRAW 410,300:P 
LOT 430,260:DRAW 430,300:PLOT 430,2 
60:DRAW 450,300:PLOT 450,260:DRAW 4 
40,280 
220 NEXT 
230 PLOT 320,250,2:DRAW 360, 210:DRA 
W 190,80:DRAW 320,250:DRAW 310,200: 
DRAW 360,210:PLOT 310,200:DRAW 190, 
80:PLOT 320,250:DRAW 270,250:DRAW 2 
60, 170:PLOT 360,210:DRAW 360, 160:DRA 
AW 280, 150:PLOT 380, 160 
240 DRAW 310,90:DRAW 390, 190:DRAW 3 
80, 160:DRAW 410, 170:DRAW 310, 90:PLO 
T 390, 190:DRAW 410, 170:PLOT 200,200 
:DAAW 270,270:DRAW 280, 300:DRAW 300 
‚280:DAAW 270,270:PLOT 200, 200:DRAW 
280, 300:PLOT 300,280 
250 DRAW 200,200:PLOT 270, 240:DRAW 
250,240:PLOT 280,250:DRAW 290,270:P 


LOT 350, 140:DRAW 350, 160:PLOT 360, 1 
70:DRAW 380, 180 

260 IF flag=1 THEN 390 

270 OUT &BC00,8:0UT &BDO0O, 1 

280 FOR noise=26 TO 0 STEP -1:50UND 
2,0,3,7,, ,noise 

290 BORDER noise 

300 NEXT noise 

310 FOR noise=0 TO 26:50UND 2,0,3,7 
5, „noise 

320 BORDER noise 

330 NEXT noise 

340 BORDER 0 

350 OUT &BC00,8:0UT &BD00,2 

360 PEN 1:LOCATE 2,24:PRINT"FIRE -> 
LOAD ... ENTER -> INSTRUCTIONS"” 
370 IF JOY(O0)=16 THEN 380 ELSE IF I 
NKEY$=CHRA$( 13) THEN 550 ELSE 370 
380 LOCATE 1,24:PRINT SPACE$( 40) 
390 RESTORE 520 

400 k=25 

410 o0=15 

420 FOR loop=1 TO 2 

430 FOR note=1 TO 21 

440 READ wert, dauer$ 

450 IF dauer$="k"” THEN dauer=k 

460 IF dauer$="o" THEN dauer=o 

470 SOUND 4+32,wert,dauer, 7 

480 SOUND 1+8,wert+2,dauer,7 

490 NEXT note 

500 RESTORE 520 

510 NEXT loop 

520 DATA 358,k,358,k,358,k,478,0,56 
8,k,478,0,358,k,319,k,284,k,284,k,2 

53,k,253,k,284,k,284,k,319,k,284,0, 
319,kK,284,0,319,k,239,k,358,0 

530 LOCATE 9,24:PEN 1:PRINT"LOADING 
- PLEASE WAIT" 

540 RUN” IHYPER.PGM" 

550 ’ANLEITUNG 

560 INK 3,6 

570 MODE 1 

580 PEN 2 

590 PARINT"DU BIST IN EINEM UNTERIRD 
ISCHEN STOLLENIDEINE MISSION LAUTET 
‚DIE ERDE VOR DEN AUSSERIRDISCHEN 
ZU RETTEN,DIE IN STOLLENDIE ERDE U 
NTERGRABEN WOLLEN,UM IRDISCHE STAED 
TE ZU VERNICHTEN! DU BIST MIT DEM 
MODERNSTEN WAFFENSYSTEM,DAS ES ZUR 
ZEIT ”; 

600 PRINT"GIBT,DEN HYPER MISSILES,A 
USGERUESTET! GEH MIT IHNEN SPARSA 

M UM, DENN BEI JEDEMSCHUSS VERLIERS 
T DU EINEN TEIL DEINER ENERGIE!” 

610 PEN 3:PRINT"PASSE AUCH AUF DIE 56 
TOLLENWAENDE AUF ,UND VERURSACHE KEI 

NEN CRASH MIT DEN FEIND- LICHEN UF 
05,DENN DAS KOSTET DICH AUCH WERT 
VOLLE ENERGIE! MIT DEM JOYSTICK (0) 
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LISTING 


STEUERST DU DEIN RAUMSCHIFF RAUF U 
ND RUNTER!” 
620 PEN 1:PRINT"”JE NACH GEGNERART B 
EKOMMST DU ENTWEDER 150 ,„ 100 , OD 
ER 50 PUNKTEI ES IST ABER AUCH NICH 
T 80 LEICHT DIEBE PUNKTE ZU ER-REICG 
HEN,DENN DEINE FEINDE KOENNEN AUCH 
SCHIESSENI II” 
630 PEN 3:PRINT”NACH ABLAUF EINER Z 
EIT,DIE VOM LEVEL AB-HAENGIG IST,IS5 
T DEINE MISSION BEENDETI" 

640 PEN 2:PRINT:PRINT TAB( 16) "[ TAST 
E]" 

650 CALL &BB00:CALL &BB1B 

660 ’BILD LOESCHEN 

670 ODRIGIN 0,200 

680 FOR loesch=-0 TO 200 56TEP 2 

690 MOVE O,loesch:DRAWR 640,0,0 

700 MOVE 0O,-loesch:DRAWR 640,0,0 
710 SOUND 1+8,200,1,7:50UND 4+32,20 
1,1,7 
720 NEXT loesch 

730 INK 3,6 
740 flag=-1:CL5:G0T0 160 
750 ’MC-CODE 1 / RLC-ROUTINE 
760 SYMBOL AFTER 256:MEMORY E9FFF 
770 RESTORE 820 
780 FOR adr-&EA0O00 TO EADOA 
790 READ code 
800 POKE adr,code 

810 NEXT adr 
820 DATA &21,600,6C0,6CB,6&06,623,6&B 
C,620,6FA,6C9,&00 
830 ’MC-CODE 2 / SRAL-ROUTINE 

840 RESTORE 890 
850 FOR adr-&EAO0OB TO EAD1IS 

860 READ code 
870 POKE adr,code 

880 NEXT adr 

890 DATA 621,600,6C0,6CB,63E,623,6B 
C,620,6FA,6C9,6&00 

900 ’5YMBOLDEFINIERUNGEN 

910 SYMBOL AFTER 47 

920 SYMBOL 48,6FC,68C,694,6B4,6AA,6& 
C4,6FC,60 ’O 
930 SYMBOL 49,670,610,610,610,610,6& 
10,6FC,E0 1 
940 SYMBOL 50,6FC,64,64,EFC,680,6&8BO 
‚EFC,EO 2 
950 SYMBOL 51,6FC,64,68,670,6C,64,6& 
FC,60 3 
960 SYMBOL 52,690,690,690,&6FC,610,6& 
10,610,60 ’4 
970 SYMBOL 
‚EFC,6O 
980 SYMBOL 
84,6FC,60 
990 SYMBOL 55,6FC,64,64,61C0,64,64,6 
4,60 7 

1000 SYMBOL 56,678,648,648,678,68B4, 


53,6FC,680,680,6FC,64,64 
5 
54,6FC,680,680,6FC,684,6 
6 


684, 6FC,560 


1010 SYMBOL 
4,6FC,E0 

1020 SYMBOL 
684,684,60 


1030 BYMBOL 
684 ,6FC,60 


1040 SYMBOL 
EEO,EFC,5E0 
1050 SYMBOL 
EEA,EFC,EO 
1060 SYMBOL 
E80,6FC,60 
1070 SYMBOL 
E80,680,60 
1080 SYMBOL 
E84, 6FC,60 
1090 SYMBOL 
E684,684,60 
1100 SYMBOL 
&20,6FC,60 
1110 SYMBOL 
‚E3C,60 
1120 SYMBOL 
EC8, 684,60 
1130 SYMBOL 
EEO,EFC,6O 
1140 SYMBOL 
EB4,EB4,60 
1150 SYMBOL 
E8C,684,60 
1160 SYMBOL 
ECC,EFC,60 
1170 SYMBOL 
£680,680,60 
1180 SYMBOL 
EBE,EFD,EO 
1190 SYMBOL 
688,688,60 
1200 SYMBOL 
4,6FC,60 
1210 SYMBOL 
630,630,60 
1220 SYMBOL 
684,EFC,EO 
1230 SYMBOL 
&30,630,60 
1240 SYMBOL 
6B4,648,60 
1250 SYMBOL 
648,684,60 
1260 SYMBOL 
E30,630,60 
1270 SYMBOL 
40,6FC,60 
1280 SYMBOL 
‚E7IF,E3F,6EO 
1290 SYMBOL 
FE,EFC,60 
1300 SYMBOL 
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TL——————————————————————————————————————— 


7: 
57,6FC,684,684,6FC,64,6 
‚9 
65,6FC,684,684,6FC,684, 
A 
66, 6F0,600,600,6F0,604, 


67,6FC,680,680,680,6C0, 
6 
68,6FC,684,684,684,6C4, 
"D 


69,6FC,680,680,6F8,680, 
"E 
70,6FC,680,680,&6F8,680, 
F 


71,6FC,680,680,6BC,684, 
’G 
72,684,684,684,6FC,68B4, 
H 


73,6FC,620,620,620,620, 
7a,54,64,04,664,684,044 
75,684, 684, 688, 690,680, 
76,080,80,680,080,600, 
77,0FC,684,684,0B4,04, 
GB ROM COH CAR JEBR EUR. 
N 


79,EFC,ECC,684,684,684, 
2) 
80,6FC,684,684,6FC,6B0, 
‚p 


B1,6FC,684,684,684,694, 
‚Q 
82,6FC,684,684,6FC,68B, 
"A 


83,6FC,660,680,678,64,6 
4, 6FC,630,630,630,630, 
85,684,084,684,084,084, 
DEE SEIEN 
.v 


87,6B4,6B4,6B4,6B4,E6B4, 
w 
88,684,648,630,630,630, 
2 
89,684,684,684,6FC,630, 
.y 
90,6FC,68,610,620,620,6 
74 
204,6E0,670,638,63F ‚,67F 
"FLUGZEUG 1A 
205,60,60,678,6CE,EFF,& 
"FLUGZEUG 1B 
206,60,60,60,60,680,60, 


LISTING 


60,60 "FLUGZEUG 2A 
1310 SYMBOL 207,60,60,610,614,61F,& 
ED,EBF,EF5S HAUS 1 


1320 SYMBOL 208,60,&6F,63B,62E,63B,& 


EE,EBB,EFF HAUS 2 

1330 6YMBOL 209,63,61F,61D,6F7,6BD, 

EF7,EBD,GEF? HAUS 3 

1340 SYMBOL 210,624,818,630,867E,6DB 

‚E7E,67E,699 "FEIND 1A 

1350 SYMBOL 211,60,60,60,650,624 
"FEIND 1B 


1360 SYMBOL 212,60,60,60,60,6E,60,6& 


0,560 "GESCHOSS 1A-VERTEIDIG 
UNG 

1370 SYMBOL 213,60,60,60,6BE,&F1,68 
E "GESCHOSS 1B-VERTEIDIG 
UNG 

1380 6YMBOL 214,650,62,65,638,6F8,63 
8,65,62 "GESCHOSS 2A-GEGNER 


1390 SYMBOL 215,60,60,60,60,566 
"GESCHOSS 2B-GEGNER 


1400 SYMBOL 216,60,6E9,68D,6CF,68B, 


EI ’EN 

1410 SYMBOL 217,60,677,645,667,646, 
675 "ER 

1420 SYMBOL 218,60,675,645,677,652, 
672 ’6Y 

1430 SYMBOL 220,610,610,638,6AA,&AA 
‚638,610,8610 "FEIND 2A 


1440 SYMBOL 221,60,60,6C06,610,610,6 
0,644,682 "FEIND 2B 

1450 SYMBOL 222,618,624,642,681,681 
‚E42,624,618 "FEIND 3A 

1460 SYMBOL 223,60,60,624,618,618,6 
24,60,60 "FEIND 3B 

1470 SYMBOL 224,60,6F7,685,6E5,615, 
615,6F7,60 BONUSZEIGER 50 

1480 SYMBOL 225,60,6BF,&AD,EAD,EAD, 
EAD,EBF,E0 BONUSZEIGER 100 

1490 SYMBOL 226,60,6BF,EA5,6B5,68D, 
E80,6BF,50 BONUSZEIGER 150 

1500 RETURN 
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ID "FREUE 


20 "* _HYPER ATTACK - MAIN * 
30 ’* VON * 
40 '* MARCO JEDAMSKI * 
50 '# FUER ® 
60 '* SCHNEIDER AKTIV * 
70 '#* CPC 464/664/6128 je* 


BO HERE TEE EICH 


"INITTIALISIERUNG 

110 CLEAR 

120 RANDOMIZE TIME 

130 ENT 1,25,5,1 

140 ENT 1,25,5,1:ENT 2,15,5,2 

150 ENV 2,15,5,2:ENV 3,1,10,30,10,- 


160 SPEED KEY 255,255 

170 DEFINT a-z 

180 SPEED INK 100, 100 

’VORGEGEBENE HIGHSCOREDATEN 

200 RESTORE 210 

210 DATA MASTER, 3000,STONE,2000,T.0 
.M.,1000,N0B0DY I,900,D.J.,800,NOBO 
DY I11,700,Z80 A,600,CPC 464,500,S0M 
EBODY,400, THE BEST,300 

220 FOR hiscta>=1 TO 10 

230 READ nameta$(hiscta) ,‚scoretal(hi 
scta) 

240 NEXT hiscta 

250 ’ABFRAGE NACH ANZAHL DER SPIELE 
A UND LEVEL 

260 INK 3,6 

270 MODE 1 

280 PEN 1 

290 PRINT TAB( 6) "WILLKOMMEN ZU 
ER ATTACK ’” 

300 PRINT STRING$( 10,11) 

310 PEN 2 

320 LOCATE 3,17:PRINT"WIEVIELE SPIE 
LER MACHEN MIT (1-3) 7?” 

330 SOUND 1+8,501,100,1,3:50UND 4+3 
2,500, 100,1,3 

340 player$=INKEY$:player=VAL(playe 
r$) :IF player<1 OR player>3 THEN 34 
18] 

350 WHILE INKEY$<>"":WEND 

360 PRINT STRING$(2,11):PEN 3 

370 PRINT” NUN NUR NOCH DAS SPIELL 
EVEL (1-3) 7?" 

380 SOUND 1+8,400,100,1,3:50UND 4+3 
2,401,100,1,3 

390 level$=INKEY$:level-VAL( leval$) 
:IF level<1 OR level>3 THEN 390 

400 CLS 

410 PEN 2 

420 LOCATE 14,25:PRINT”HYPER ATTACK 


’HYP 


430 PRINT STRING$( 20, 10) 
440 FOR eingabe-=1 TO player 
450 LOCATE 1,10 
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LISTING 


A60 
470 


450 
490 


PRINT”DEIN NAME, PLAYER"; 

PEN 2 

PRINT eingabe; 

PEN 1 

500 PRINT"”(MAX. LAENGE: 101)" 

510 SOUND 1+8,(eingabe*60) +1, 100,1, 
3:50UND 4+32,(eingabe*#60) ,100,1,1 
520 WINDOW#1,5,15, 12,12 

530 INPUT#1,"",name$( eingabe) 

540 IF LEN(name$( eingabe))<i THEN n 
SPORUEINBEBR) =" NOBODYTSETRST SI Nabe 


550 IF LEN(name$( eingabe)) >10 THEN 
530 

560 name$( eingabe) -UPPER$( name$( ein 
gabe)) 

570 CL541 

580 NEXT eingabe 

590 ’BILD LOESCHEN 

600 FOR b1=-40 TO 1 STEP -0.5:50UND 
2, INT( AND#200) +1,1,7:DUT &BCO0, 1:0U 
T &BD00,b1:CALL EBD19:NEXT bl 

610 CLS:0UT &BC00,1:0UT &BD00,40 
620 ’ABFRAGE OB NAECHSTER SPIELER 0 

DER SPIEL ZU ENDE 

630 OUT &BC00,6:0UT &EBD00,25:BORDER 
0 

640 IF games<>player THEN games=gam 
es+1:G0TO 660 ELSE GOTO 2790 

650 ’VARIABLEN 

660 energy-600 

670 very=12 

6850 feia=-19 

690 feib-INT( AND*B) +12 

700 feiaalt=-20 

710 feibalt=-feib 

720 ti-level*#( INT( AND*20+20)) 

730 schritt=1 

740 borcol=0 

750 color=12 

760 r1c-GA000 

770 sr1=6AD0B 

780 zaehler=O0 

790 ’AUFBAU 

800 MODE O0 

810 PEN 2 

820 POKE 6B28F, 66 

830 LOCATE 6,20:PRINT"”PLAYER "”; game 
s 

840 LOCATE 6,22:PRINT"B I T T E” 
850 LOCATE 5,24:PRINT"W AR T E N” 

860 FOR wai=1 TO 1500:NEXT wai:FOR 

prnt=1 TO 30:PRINT:S5OUND 2,100,3,7, 

2,2:NEXT prnt 


870 CLS:OUT &BC00,1:0UT &B000,0 
8560 MODE 0 

890 PAPER 0 

900 HIMMEL 

910 FOR sky=-320 TO 400 STEP 2 
920 PLOT 1,5sKky,1:DRAW 640, sky 


930 
940 
950 
960 
970 
9860 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 


1220 


NEXT sky 


’SONNE 


DRIGIN 550, 355 


DEG 


FOR sun-1 TO 360 STEP 3 


sunx-=5IN( sun) #20 
suny=CO6( sun) #20 

PLOT sunx, suny,2:DRAW 0,0 
NEXT sun 

’BODEN 

INK 3,9 

ORIGIN 0,0 

FOR floor=-258 TO 316 STEP 2 
PLOT 1,floor,3:DRAW 640, floor 
NEXT floor 

’SCHICHT UNTER ERDE 

FOR h=-D0 TO 640 6TEP 32 

FOR 3-1 TO 16 

PLOT h-j,258,5:DRAWR 0,-( AND#1 


PLOT h+3j,258,4:DRAWR 0,-( AND#1 


PLOT h-jJ,32,5:DRAWR 0,( RND*#17) 
PLOT h+3jJ,32,4:DRAWR O,( RND*17) 
NEXT j,h 

"STREIFEN 

streamx=316 

streamy=258 

1=-60 

streamcolor=4 

FOR stream=1 TO 640 STEP 14 
PLOT stream, streamx, streamcolo 


r:DRAW l1,streamy:1=-1+29 


1230 


streamcolor=streamcolor+1:IF s 


treamcolor>5 THEN streamcolor=4 


1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 


NEXT stream 

1=0 

WHILE 1<63 

PLOT 0,258+1,15:DRAW 640,258+1 
1=1+12 

WEND 

LOCATE 5,5 

PRINT CHR$( 15) CHR$( 10) ;CHA$( 22 


) CHR$( 1) CHA$( 207) CHA$( 208) CHA$( 209) 
CHR$( 22) CHR$( 0) 


1320 
1330 
1340 
1350 
18) 

1360 
1370 
1380 


G0SUB 3120 ’BILD WIEDER ZEIGEN 
"ENERGIEANZEIGENAUFBAU 
LOCATE 1,25:PEN 1 


PRINT CHRA$( 216) CHR$( 217) CHR$C 2 


FOR estr=176 TO 250 STEP 4 
PLOT estr, 12,color:DRAWR 0,-5 
color=color+1:IF color>13 THEN 


color=12 


1390 
1101 
1400 
1410 
1420 
1430 
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SOUND 1+8,1100,2,7:50UND 4+32, 
‚2,7 

NEXT estr 

color=1 

FOR estr=248 TO energy STEP 4 
PLOT estr, 12,color:DRAWR 0,-5 


LISTING 


1440 color-color+1:IF color»? THEN 
color=1 

1450 SOUND 1+8,1000,2,7:50UND 4+32, 
1001,2,7 

1460 NEXT estr 

1470 abzug-600 


1450 "HAUPTPROGRAMM 

1490 ’JOYSTICKABFRAGE 

1500 3=JOY(0O) 

1510 IF 4-1 THEN very-very-1:LOCATE 
1,very+t1:PAINT” "; 

1520 IF j-2 THEN Varyavepyst: LOCATE 
I,very-1:PRINT” "; 

1530 IF 3-16 THEN GOSUB 1740 

1540 ’NAECHSTER SPIELER ? 

1550 IF ti<1 THEN score( games) -scor 

e( games) +( energy/10) :PEN 9:LOCGATE 2 
‚12:PAINT"MISSION COMPLETEDI":FOR t 
iout-energy TO 175 STEP -1:PLOT tio 

ut,12,0:DRAWA 0,-5:50UND 1+B,tiout, 
1,7:50UND 4+32,tiout+2,1,7:NEXT tio 

ut:GOTD 2650 

1560 IF abzug<176 THEN 2470 

1570 ’WENN ZEITANZEIGE GEWUENSCHT,D 

ANN DAS REM-ZEICHEN HERAUSEDITIEREN 
! 

1580 ’VORSICHT:SPIELGEWSCHWINDIGKEI 

T WIRD BEEINTRAECHTIGTI!! 

1590 ’LOCATE 8,3:PRINT TI 

1600 PEN 7:LOCATE 1,very 

1610 PRINT CHRA$( 204) CHR$( 205) CHR$( 2 

2) CHR$( 1) ; CHR$( 15) CHR$( 8) ; CHA$( 8) CH 

A$( 8) CHR$( 206) ;CHA$( 22) CHR$( 0) 

1620 ’ABFRAGE OB ENERGYABZUG 

1630 IF very<12 THEN very=very+1:L0O 

CATE 1,very-1:PRINT” ";:verlust=75 
:605UB 2330 

1640 IF very>21 THEN very=very-1:L0 

CATE 1,very+1:PRINT"” ";:verlust=75 
:G0OSUB 2330 

1650 IF feiaalt<=-2 AND feibalt=-very 
THEN GOSUB 1710 

1660 gebew=-INT(ARND#(6-level)):IF ge 

bew<>1 THEN 1680 ’SOLL SICH GEGNER B 

EWEGEN ? 

1670 IF zaehler<1 THEN GOSUB 1920 E 

LSE GOSUB 1970 

1680 geschu=INT( AND#*( 20-level)) :IF 

geschu=1 THEN GOSUB 2140 ’50LL GEGNE 

A SCHIESSEN ? 

1690 GOTO 1500 

1700 ’ENERGIEABZUG BEI CRASH MIT GE 

GNER 

1710 verlust=30 

1720 GOSUB 2340 

1730 RETURN 

1740 ’SCHUSSROUTINE DES VERTEIDIGER 

5 

1750 ’AUSGABE DER HYPER MISSILE 


1770 LOCATE shoot2,very 

1780 PRINT CHRA$( 15) CHR$( 15) ; CHR$C 21 
2) CHR$( 22) CHR$( 1) CHR$( 8) ;CHA$LC 15) CH 
AR$C 1) ;CHA$( 213) CHA$( 22) CHA$( 0) ; 
1790 

1500 LOCATE shoot2,very:PRINT” "”; 
1810 ’UFO GETROFFEN ? 

1820 IF shoot2=feiaalt AND very-fei 
balt THEN 2240 


1830 IF shoot2=feiaalt-1 AND very=f 
eibalt THEN 2240 

1840 SOUND 1+8,25,5,5,,1:50UND 4+32 
‚50,5,5,,1 

1850 NEXT shoot2 

1860 LOCATE shoot2+1,very:PRINT” ”; 
1870 verlust=20 

1880 GOSUB 2360 

1890 RETURN 


1900 ’GEGNER 
1910 ’WELCHER GEGNERTYP ? 
1920 zaehler=19:art=INT( AND*#3) 


1930 IF art=0O THEN fa=-210:fb=211 
1940 IF art=1 THEN fa=220:fb=221 
1950 IF art=2 THEN fa=222:fb=-223 
1960 ’AUSGABE DES GEGNERISCHEN UFO’ 
5 

1970 color=INT( (AND*#4) +1) +11 

1980 LOCATE feia,feib:PEN color 
1990 PRINT CHR$( fa) ;CHRA$( 15) CHA$C 11 
) ; CHAR$( 8) CHR$C 22) CHR$(C 1) CHR$C Fb) CHR 
$( 22) CHR$(0); 

2000 SOUND 1+8, INT( RND#400) +1,1,7:5 
OUND 4+32, INT( AND#200) +1,1,7 

2010 LOCATE feiaalt, feibalt:PAINT” 


2020 zaehler=-zaehler-1 
2030 ’FESTLEGEN DER NEUEN BEWEGUNGS 
RICHTUNG 


2040 feiaalt=feia:feibalt=-feib 

2050 feibneu=INT( RND*2) 

2060 feia=-feia-i1 

2070 IF feibneu=1 THEN feib=feib+1 
ELSE feib=-feib-1 

2080 IF feib<12 THEN feib>=12 ELSE I 
F feib>21 THEN feib-21 

2090 IF feia<1i THEN LOCATE 1,feibal 
t:PRINT” ":LOCATE 1,feib:PAINT" ":f 
eia=-19:feiaalt=20 

2100 ti=ti-1:score( games) -score( gam 
es) +5:verlust=-2:605UB 2360 

2110 RETURN 

2120 ’5CHUSSSTEUERUNG DES GEGNERS 
2130 ’AUSGABE DER RAKETE 

2140 FOR shoot1i=-feia TO 1 5TEP -2 
2150 LOCATE shoot1,feib 

2160 PRINT CHR$( 15) CHA$( 12) ;CHR$( 21 
4) CHR$( 8) CHA$( 22) CHR$( 1) ; CHA$( 15) CH 
R$( 2) ;CHA$( 215) CHA$( 22) CHR$( 0); 
2170 LOCATE shoot1,feib:PRINT" ”; 


1760 FOR shoot2=3 TO 20 STEP 2 2180 ’VERTEIDIGER GETROFFEN 7 
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LISTING 


2190 IF (shoot1-2 OR shoot1-1) AND 

feib=-very THEN verlust-50:G05UB 234 
0 

2200 SOUND 1+8,100,4,15,2,2:50UND 4 
+32,50,4,15,2,2 

2210 NEXT shoot1 

2220 RETURN 

2230 "VERTEIDIGER HAT GEGNER GETROF 
FEN 

2240 score( games) -score( games) +((ar 
t+1) #50) 

2250 zaehler-O 

2260 LOCATE feiaalt,feibalt:PRINT C 
HR$( art +224) 

2270 FOR 1-31 TO 1 STEP -( INT( AND*3 
)+1) :50UND 1, INT(RND*300) +1,1,7,,,1 
:NEXT:FOR 1=1 TOD 31 STEP INT( AND*3) 
+1:50UND 1, INT( AND*300) +1,1,7,,,1:N 
EXT 

2280 FOR wai=1 TO 10:NEXT wai 

2290 LOCATE feiaalt, feibalt:PRINT” 


2300 feia=-19:feiaalt=20:feib=INT( AN 
D*#8) +12: feibalt=feib 


2310 RETURN 

2320 ’ENERGIEABZUG UND ABFRAGE OB V 
ERTEIDIGER TOT 

2330 PRINT CHR$( 22) CHR$( 0) ; 

2340 SOUND 2,250,50,7,,,15 

2350 BORDER 26:FOR wai=-1 TO 50:NEXT 
wai:BORDER borcol 

2360 eneralt=energy 

2370 energy=energy-verlust 

2380 FOR abzug-eneralt TO energy 56T 
EP -1 

2390 PLOT abzug, 12,0:DRAWR 0,-5 
2400 IF abzug<250 THEN borcol=-6:BOR 
DER borcol 


2410 NEXT abzug 

2420 RETURN 

2430 ti=ti-2 

2440 score( games) =score( games) +5 
2450 verlust=5:605UB 2360 

2460 ’VERTEIDIGER TOT -> NAECHSTER 
SPIELER 

2470 BORDER O 

2480 OUT &BC00,8:0UT &BDOO, 1 

2490 FOR expl=1 TO 31 


2500 BORDER INT( RND*#26) +1 

2510 SOUND 2,0,10,7,,,expl 

2520 PLOT 170,320, INT( RND#15) +1:DRA 
WR RND*-180+90 , RND*20+10 

2530 NEXT expl 

2540 OUT EBC00,8:0UT &BD00,2 

2550 SPEED INK 1,1:BORDER 0,26 
2560 FOR roll=25 TO 0 STEP -1 

2570 OUT &BCO00,6:0UT &BDO0O,roll 
2580 SDUND 2,0,3,7, ,, INT AND#31) +1 
2590 FOR wai=1 TO 30:NEXT wai 
2600 NEXT roll 


2610 CLS 

2620 SPEED INK 100, 100:BORDER 0 

2630 score( games) =score( games) +( ene 

rgy/10) :G0T0 630 

2640 ’BILD LOESCHEN FUER NAECHSTEN 

SPIELER 

2650 BORDER 0O 

2660 FOR aufruf1=0 TO 7 

2670 SOUND 1+8,400,6,7 

2680 IF INT(aufruf1/2) THEN CALL rl 

c 

2690 SOUND 4+32,410,8,7 

2700 NEXT aufrufi 

2710 FOR aufruf2=0 TOD 7 

2720 SOUND 1+8,500,8,7 

2730 IF INT(aufruf2/2) THEN CALL sr 
ı 

2740 SOUND 4+32,510,6,7 

2750 NEXT aufruf2 

2760 CLSE:LOCATE 5,13:PARINT"BONUS "; 
level#2#100:FOR wai=1 TO 1200:NEXT 

wai:score( games) =score( games) +level 

#*2#100 

2770 GOTO 630 

2750 "HIGHSCORETABELLE 

2790 MODE 0 

2800 PEN 1:LOCATE 2,25:PRINT”HIGHSC 

ORE TOP TENI” 

2810 PRINT STRAING$( 22, 10) 

2820 FOR loop=1 TO player 

2830 FOR ver=1 TO 10 

2840 IF scoreta( VER) <score( loop) TH 

EN help=score( loop) :score( loop) =sco 
reta( ver) :scoreta( ver) =help:help$=n 

ame$( Loop) :name$( loop) -nameta$( ver) 
:nameta$( ver) =help$ 

2850 NEXT ver,loop 

2860 color=1 

2870 FOR sprnt=1 TO 10 

2880 PEN color 

2590 color=color+1:IF color>9 THEN 
color=1 

2900 LOCATE 1,5PANT+5:PRINT” "namet 
a$( sprnt) ;SPACE$( 11-( LEN( nameta$( sp 

rnt))))”:"scoreta( sprnt) 

2910 NEXT sprnt 

2920 PEN 8:PRINT:PAINT TAB( 3) "TASTE 
DRUECKEN!” 

2930 CALL &£BBOO 

2940 ’EFFEKT >> BORDERBLINKEN << 

2950 WHILE INKEY$="":FOR wert=60 TO 
127:0UT &7F00,&611:0UT &E7F00O,wert:N 

EXT wert :BORDER INT( AND#27) , INT( RAND 

#27) :WEND 

2960 MODE 1:BORDER O0 

2970 PEN 2 


2980 LOCATE 6, 13:PAINT"FEUER UM NOC 
HMAL ZU SPIELEN!" 

2990 tas$=INKEY$:IF tas$="" THEN 29 
90 
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LISTING schneide 


3000 IF (JOY(0) AND 16) THEN games- 
0:G0T0 250 

3010 CLS:LOCATE 5,13:PEN 1:PRINT"”SA 
Y G00D BYE TO ’HYPER ATTACK ’":CALL 


&6BBOU:CALL EBB18:CALL &BC0O2:CALL &B 
B4E:CALL &BB00:MODE 1:PEN 1 


3020 END 

3030 "HAUPTPROGRANM ENDE 

3040 "BLENDEN 

3050 FOR b1-40 TO 0 STEP -ı 
3060 OUT EBC00,1:0UT &BD00,b1 
3070 OUT &BG00,6:0UT &BD00, INT(b1*0 
.625) 

3080 CALL &BD19 

3090 SOUND 2, 100,1,6 

3100 NEXT 

3110 RETURN 

3120 FOR bl-0 TO 40 


3130 
3140 
.625) 
3150 CALL 68019 
3160 SOUND 2,50, 1,7? 
3170 NEXT bl 

3180 RETURN 


PARAM 


Mit dem Programm ‚‚Param“ von Schneider aktiv- 
Autor Holger Schlichting wird es dem User möglich 
emacht, auf komfortable Weise einige Programm- 
unktionen aufzurufen, die unter Basic nur begrenzt 

oder überhaupt nicht zur Verfügung stehen. 

Tippen Sie den Datalader ab und speichern Sie ihn 
zur Sicherheit vor dem Start ab. Ein eventuell durch 
Datafehler verursachter Absturz des Rechners wird 


somit nicht zur Katastrophe. ‚Param“ läuft nur auf 
dem CPC 464. 


OUT &BC00,1:0UT &BD00,b1 
OUT EBC00,6:0UT &BD00,INT(b1*0 


4 PHBRHRHARRARARSSSRSRIESEIEIEIESIESESESERESESESENE 
2 x PARAM * 
3 ’% VON * 
a '* HOLGER SCHLICHTING * 
5 + FUER # 
6 ’* SCHNEIDER AKTIV * 
7% CPC 464 lm* 


BEE EHNUHRUREHEHN 


10 MEMORY E9IFFF 
20 FOR adr=&6A000 TO EA116:READ a$:P 
OKE adr,VAL("&E”+a$) :NEXT 
30 DATA 7B,FE,01,C2,28,A0O,21,A2 
DATA A0O,7E,23,CD,5A,BB,8B7,C2 
DATA 09,A0,21,13,AC,36,CD,23 
DATA 36,00,23,36,BB,C9,7E,23 
DATA CD,5A,BB,87,C2,1E,AO0,C9 
DATA FE,02,C2,45,A0,21,13,AC 
DATA 36,C9,23,36,09,23,36,C9 
100 DATA 21,BD,AO,7E,23,CD,5A,BB 


aktiv) 


87,C2,38,A0,C9,FE,03,C2 
6D,AO,21,D8,A0,7E,23,CD 
5A,BB,87,C2,40,A0,21,00 
00,21,00,C0,11,00,40,01 
00,40,7E,02,23,03,3E,FF 
BC,C2,62,A0,C9,FE,04,C2 
95,A0,21,00,00,21,EA,AO 
7E,23,CD,5A,BB,87,C2,78 
AO,21,00,00,21,00,C0,01 
00,40,0A,77,23,03,3E,FF 
BC,C2,8A,A0O,C9,21,FC,AO 
7E,23,CD,5A,BB,87,C2,98 
AO,C9,4C,69,73,74,73,63 
68,75,74,7A,20,65,69,6E 
67,65,73,63,68,61,6C,74 
65,74,20,21,00,4C,69,73 
74,73,63,68,75,74,7A,20 
61,75,73,67,65,73,63,68 
61,6C,74,65,74,20,21,00 
53,63,72,65,65,6E,20,2D 
2D,3E,20,40,65,6D,6F,72 
79,00,40,65,6D,6F,72,79 
20,2D,2D,3E,20,53, 63,72 
65,65,6E,00,46,61,6C,73 
63,68, 65,20,50,61,72,61 
6D0,65,74,65,72,65,69,6E 
67,61,62,65,20,21,00 


Nach Programmstart können die einzelnen Funktio- 
nen durch CALL &A000,parameter aufgerufen wer- 
den. Mit CALL &A000,1 wird der Listschutz einge- 
schaltet und mit CALL &A000,2 wieder abgestellt. 
Nach einem CALL &A000 3 wird der Bildschirm im 
Speicher bei &4000 abgelegt. Mit CALL &A000,4 
kann man ihn wieder aus dem Speicher holen. Ein 
im Speicher vorhandenes Basicprogramm wird durch 
die CALLs nicht beeinträchtigt. 

„Param“‘ gibt automatisch eine Fehlermeldung aus, 
wenn die Parameterübergabe nicht in Ordnung ist. 
Um das Programm schneller zu machen, wurde auf 
eine RSX-Befehlserweiterung verzichtet. Die CALLs 
suchen sich ihre Einsprungadressen von selbst. 


110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
2850 
290 
300 
310 
320 
330 
340 
350 
360 
370 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


(TB) 


Für CPC 464/664/6128: 48 
Prog. f. Mathematik, Chemie 
u. Physik (120 KB). Disk 

3“: 39,— DM;Kass: 33,— DM. 
Info gg. Freiumschlag 0,80 
DM bei: Henning Schnitger, 
Langenweg 144, 2900 Olden- 
burg od. Tel. 0441/301492 
Verk. Orig.-Programme f. 
Schneider CPC (Kass. od. 
Disk.). Info gg. Rückporto. 
G. Radons, Kolbenzeil 18, 

69 Heidelberg 

Wer kann mir f. das Spiel A 
View to a Kill eine dt. Spiel- 
anl. schicken! Gerd Tuaschek, 
Riesstr. 6, 8860 Nördlingen/ 
Nähermemmingen 


Orig.-Joyce-Software zu tau- 
schen: Biete dBase II, Joyce- 
Mailing-System u. Supercalc 
2. Suche Wordstar, Turbo- 
Pascal, AMX-Seitengestalter, 
Grafpfad 3, CPS8256, RS 
232, Prowort, Cracker, Var- 
dat II, Desktop Publishing 

£. Joyce. Erwin Maußham- 
mer, Westendstr. 5, 8501 
Oberferrieden 


6128er Anwender sucht an- 
dere 6128er Anwender im 
Raum Siegen f. Erfahrungs- 
austausch u.v.a. Prog.-Verbes- 
serung im Bereich HELP, 
PIP, CAD! Keine Club-Grün- 
dung! Tel. 0271/55463, Pit 


Schneider LISTING 


[131 ne 


aktiv) 
NOTEN- 
SPIEGEL 


Welcher Schüler will im Laufe eines Schuljahres nicht 
mal sehen, wie er in den einzelnen Fächern steht, wel- 
che Noten er erreicht hat, wo er noch etwas mehr als 
bisher tun muß? Hier haben Sie das Programm dazu. 
Dieses Listing unseres Autors Markus Burger macht es 
möglich, pro Fach die Noten auf dem Bildschirm oder 
wahlweise auch auf dem Drucker im Zusammenhang 
auszugeben. 


[Note 12.0014 0015.0012.0013.00l2.00a.00la.ula.oı | | | | 
6 


otendurchschnitt: 
3.22 


IV = WIE 


Nach dem Start des Programms können Sie die ge- 
wünschte Grafikart eingeben. Sie haben dabei die 
Wahl zwischen einer Balkengrafik oder einem Linien- 
diagramm. Oder Sie wählen die vergleichende Darstel- 
lung mit dem Klassendurchschnitt. 

Sie können bis zu dreizehn Noten je Fach eingeben. 
Und das sollte ja wohl für ein Schuljahr reichen. Denn 
wo werden schon mehr als 13 Noten pro Jahr ver- 
geben? 

Nachdem alle Noten eingegeben wurden, wird der bis- 
her erreichte Durchschnitt angezeigt. Dann können Sie 
sich auf Wunsch auch eine Hardcopy anfertigen lassen 
und wissen genau, wie Ihre Leistungen sind. 

Bei diesem Programm wurde bewußt auf zuviele REM- 
Zeilen verzichtet. Dafür wurde um so mehr auf eine 
strukturierte Form und verständliche Variablennamen 
Wert gelegt. 

Das Programm läuft auf allen CPCs. Die Druckausgabe 
wurde für einen DMP 2000 geschrieben. Das Programm 
läuft aber auch ohne Drucker normal ab, natürlich 
dürfen Sie dann die Druckroutine nicht aufrufen. 


(JE) 
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LISTING 


2. RRRHRRHSHRISHESRRISHIRSIHIESESEREIHE RESET 
a x NOTENSPIEGEL * 
6 ’%* VON * 
8 ’# MARKUS BURGER * 
10 ’* FUER = 
12% SCHNEIDER AKTIV * 
ı1a '* CPC 464/664/6128 je* 


I6 BREUER TTS SEE TE HEINE 
20 ’ 

30 CLEAR 

40 zahl%=1 

50 RESTORE 

60 MODE 2:INK 1,24:INK 0,0:PEN 1:PA 
PER 1:CL8 

70 REM ZEICHNEN DES RAHMEN 

80 MOVE 0,0:X=399:Z=639:DRAW Z,0,0: 
DRAW Z,X:DRAW 0,X:DRAW 0,0 

90 MOVE 2,2:DRAW 637,2,1:DRAW 637,3 
96:DAAW 2,396:DRAW 2,2 

100 MOVE 4,4:DRAW 635,4:DRAW 635,39 
4:DRAW 4,394:DRAW 4,4 

110 REM FESTLEGUNG WINDOWGROESSE 
120 WINDOW#0,2,19,24,5:PAPER#0,0:CL 
5 #0:PEN 1 

130 WINDOW#1,21,79,24,4:PAPERf1,0:C 
LS#1:PEN 1 

140 WINDOW #2,2,79,3,2:PAPERf#2,0:CL 
5 #2:PEN 1 

150 MOVE 8,350:DRAAW 631,350, 1 

160 MOVE 8,384:DRAW 631,384, 1:MOVE 
8,336:DRAW 151,336 


170 REM ZEICHNEN DER X UND Y ACHSE 
180 MOVE 201,335:DRAW 201,50, 1:DAAW 
622,50 

190 REM PFEILSPITZEN 


200 FOR x=196 TO 205:MOVE 200, 342:D 

RAW x,335,1:NEXT x 

210 FOR x=44 TO 56:MOVE 622,50:DRAW 
610,x:NEXT x 

220 REM Zeichnen der Koordinatenabs 

chnitte 

230 a=-200:b=196:FOR x=50 TO 325 STE 

P 25:MOVE a,x:DRAW b,x:NEXT 

240 a=-50:b=-46:FOR x=200 TO 590 STEP 
30:MOVE x,a:DRAW x,b:NEXT 

250 WINDOW SWAP 0,1:LOCATE 1,14:PEN 
1 

260 

270 


LOCATE 
LOCATE 


1, 14:PAINT"N 
1, 15:PAINT"O 
280 LOCATE 1,16:PRINT"T 
290 LOCATE 1,17:PRINT"E":MOVE 159,1 
6:DRAW 159,348,0 
300 LOCATE 36,21:PRINT"ANZAHL DER A 
ARBEITEN” 
310 PEN 1 
320 FOR x=1 TO 6:READ d:LOCATE 2,d: 
PRINT zahl%:zahl%=zahl%+1:NEXT x 
330 DATA 18,15,12,9,5,2 
340 FOR b=-1 TO 13:READ a 

350 LDCATE a,20:PRINT b:NEXT b 


360 REM Data fuer Position Zahlen A 

rbeitsanzahl 

370 DATA 7,11,15,19,22,26,30,34,38, 

41,45,48,52 

380 WINDOW SWAP 1,0 

390 CLS#2:WINDOW SWAP 0,2:PEN 1:L0C 

ATE 2,1:PRINT"ARBEIT:"” 

400 LOCATE 14,1:PRINT" 1 2 3 

4 5 6 7 

410 LOCATE 50, 1:PRINT”8 9 10 
11 12 13 ” 

420 H=-352:1=384:FOR X=90 TO 640 ST 

EP 40:MOVE X,H:DRAW X,I,1:NEXT X 

430 LOCATE 2,2:PRINT"NOTE: " : WINDOW 

SWAP 2,0 

440 REM MENUE 

450 LOCATE 1,3:PRINT"WELCHE GRAFIKA 

AT: BALKEN ===> A KURVE 

B 

460 LOCATE 1,6:PRINT"BALKEN MIT KLA 

SSENSCHNITT ===> C 

470 art$=INKEY$:IF Art$="" THEN 470 

480 art$=UPPER$( art$) 

490 IF art$<>"A" AND art$<>"a” AND 

art$<>"”B” AND art$<>"b" AND art$<>"” 


z==m> 


C” AND art$<>"c” THEN 470 
500 IF art$="a" OR art$="A" THEN MO 
VE 220,50 


510 IF art$="B" OR art$="b" THEN MO 
VE 230,50 

520 IF art$=-"C" OR art$=-"c"” 
VE 220,50 

530 CLS#0:LOCATE 1,3:INPUT#O, "FACH 
= ",FACH$ 


THEN MO 


535 CLS#0:LOCATE 1,3:INPUT#O, "DATUM 
: ",DATUM$ 

540 LOCATE 1,5:INPUTfO, "ARBEITSANZA 

HL: ",ARBANZ 

550 IF arbanz>13 OA arbanz<1 THEN 5 

40 

560 MOVE 230,50 


570 LOCATE 1,7:PRINT#O, "EINGABE DER 
NOTEN: ” 

580 FOR noteanz=1 TO ARABANZ 
590 LOCATE 1,8:PRINT” 

TE 1,8:INPUT#0,”"”,NOTE 

600 IF NOTE>6 OR NOTE<1 THEN 590 

610 notensumme=notensumme+tnote 

620 IF ART$<>"C” AND ART$<>"c” THEN 
650 ELSE LOCATE 1,10 :PRINT”KLASSE 
NNOTE”: LOCATE 1,11:PRINT" 

":LOCATE 1,11:INPUT#O,”"",KLASSEN 

NOTE 

630 IF KLASSENNOTE>6 OR KLASSENNOTE 
<1 THEN 620 

640 KLASSENSUMME=-KLASSENSUMME +KLASS 
ENNOTE 

650 WINDOW EWAP 0,2:L0OCATE 12+C0,2:C 
=C+5:PRINT USING”#.##” ; NOTE 

660 WINDOW SWAP 2,0 


":LOCA 


79 


LISTING 


670 
SUB 
680 
SUB 
690 
SUB 
700 


IF art$="a" OR aRT$="A" THEN GO 

1160 

IF art$="8" OR art$="b" THEN GO 

1220 

IF art$="c” 

1270 

NEXT noteanz 

710 CLS#O 

720 IF ART$="a”" OR ART$="A" OR art$ 

="c" OA art$="C" THEN MOVE 10,304: 
FOR Z=304 TO 330 STEP 

2:A=10:L=20:DRAW R,Z:DRAW L,Z:NEXT 

:LOCATE 3,2: PRINT"= NOT 

E 

730 IF ART$="c" OR art$="C" THEN MO 

VE 10,256:FOR z=256 TO 290 STEP 4:D 

RAW R,Z: DRAW L,Z: NEXT :LOCATE 

3,5:PRINT"”=KLASSENSCHNITT 

740 IF ART$="B" OR ART$="b" THEN MO 

VE 10,304:DRAW 15,320:DRAW 20,310: 
DRAW 25,314:DRAW 30,3 

20:LOCATE 5,2:PRINT”= NOTE 

750 LOCATE 1,7:PRINT"FACH : 

760 LOCATE 1,8:PRINT FACH$ 

770 LOCATE 1,10:PRINT”"Notendurchsch 

nitt:" 

780 REM BERECHNUNG DURCHSCHNITT 

790 LOCATE 3, 11:durchschnitt=notens 

umme/arbanz:PRINT USING”#.#4#” ; durch 

schnitt 

800 IF art$="C” OR art$="c" THEN LO 

CATE 1,13:PAINT"Klassenschnitt: 

810 IF AAT$=-"C"” OR art$=-"c" THEN LO 

CATE 3, 14:klassendurchschnitt=klass 

ensumme/ arbanz:PRINT USING”#. 

##” ;klassendurchschnitt 

815 LOCATE 1,16:PRINT"”DATUM :" 

LOCATE 7,16:PRINT DATUM$ 

LOCATE 1,18:PAINT ” D - Druck 

er N -— Neustart 


OR art$="C"” THEN GO 


830 wahl$=-INKEY$: IF wahl$="" THEN B 
30 

840 wahl$-UPPER$( wahl$) 

850 IF wahl$="D" OR wahl$="d” THEN 
870 

860 IF wahl$<>"N” AND wahl$<>"n" TH 


EN 820 ELSE GOTO 30 

870 LOCATE 1,18:PRINT "” 
880 REM 
TERN 
890 FOR i-=6ADOD TO GAOBF 

900 READ byte:POKE i,byte:s-=-s+tbyte: 
NEXT 

910 DATA Ecd,Eba,Ebb,&6cd,&e7,6bb,&3 
2,6bd 

920 DATA 680,6cd,66c,680,621,68f,60 
1,622 

930 DATA &be,680,611,600,600,&3e,&0 
7,632 


HARDCOPY AUS DATA BECKER IN 


940 DATA &c00,630,6cd,67c,630,60e,60 
0,&63a 

950 DATA &c0,620,647,6e5,6d5,6c05,&c 
d,&fO 

960 DATA Ebb,&6c01,6d1,621,6bd,630,&b 
e,Gel 

970 DATA &37,620,601,637,6cb,611,62 
b,&2b 

980 DATA &10,6e9,&cd,&af,630,679,6c 
d,&a6 

990 DATA &630,613,6e5,621,67f,602,63 
7,6ed 

1000 DATA &52,6e1,638,605,62a,6be,& 
a0,618 

1010 DATA &cc,623,67c,6b5,6&c8,62b,& 
11,600 

1020 DATA &00,622,&6be,&6a0,63e,607,6 
bd,&20 

1030 DATA 6Eb9,67c,6b4,620,6b5,63e,& 
04,632 

1040 DATA &c0,630,618,&ae,&3e,61b,& 
cd,&a6 

1050 DATA E30,63e,641,6c0d,686,680,6& 
3e,&07 

1060 DATA Ecd,636,630,6c9,6e5,&63e,& 
42,6cd 

1070 DATA GE1e,Ebb,6e1,628,602,6e1,6& 
c9,63e 

1080 DATA &0d,6cd,636,630,&63e,60a,& 
cd,&a6 

1090 DATA Ea0,&63e,61b,6cd,636,630,6& 
3e,&4c 

1100 DATA &6cd,686,630,&63e,67f,&60d,& 
a6,6a0 

1110 DATA &3e,602,6cd,636,630,6c9,& 
cd,&2e 

1120 DATA &bd,&38,6fb,6cd,&62b,Ebd,& 
c9,63a 

1130 DATA &c0,630,6fe,8607,6c8,6Gaf,& 
cb,611 

1140 DATA &cb,611,6cb,611,6c9,600,6& 
00,600 

1150 CALL EAO00:G0OTO 710 


1160 REM Balkengrafik 

1170 FOR ausfuell=50 TO 50#NOTE+25 
STEP 2 

1180 links=220+balkenbreit:rechts=2 
20+balkenbreit+20:MOVE 220+balkenbr 
eit,50 

1190 DRAW links, AUSFUELL :DAAW recht 
s,AUSFUELL:NEXT ausfuell 

1200 BALKENBREIT=BALKENBREIT+3O0 
1210 RETURN 

1220 REM Kurvengrafik 

1230 DRAW 230+breite, 50*NOTE+25:MOV 
E 230+BREITE,50:DRAW 230+BREITE,50* 
NOTE +25 

1240 MOVE 229+BREITE,50:DRAW 229+BRA 
EITE,S50#NOTE+25 

1250 breite=breite+30 


80 


1260 RETURN 

1270 REM balkengrafik Klassendurchs 
chnitt 

1280 FOR ausfuell=-50 TO 50#NOTE+25 
STEP 2 

1290 links=220+balkenbreit:rechts=2 
20+balkenbreit+10:MOVE 220+balkenbr 
eit,50 

1300 DRAW links,AUSFUELL :DRAW recht 
s,AUSFUELL:NEXT ausfuell 

1310 BALKENBREIT=BALKENBREIT+3O 
1320 MOVE 230+BREIT,SO 


1330 FOR ausfuell=50 TO S50#KLASSENN 
OTE+25 STEP 4A 


1340 1i1=-230+breit:re=230+breit+10:M 
OVE 230+breit,50 

1350 DRAW 1i,AUSFUELL:DRAW re,AUSFU 
ELL:NEXT ausfuell 

1360 BREIT=BREIT+3O 

1370 RETURN 


CHAREDIT 


Das Programm ‚‚Charedit‘‘ unseres Autors Wolfgang 

Küting ist ein komfortabler Zeicheneditor, der den 

kompletten Zeichensatz (ASCII 32-255) des CPCs 

bearbeiten kann. 

Die Besonderheit: Es wird kein Programm erstellt, 

welches nachher den Zeichensatz definiert, sondern 

es wird der Speicherbereich des Zeichensatzes 

(HIMEM +1 bis HIMEM +2048) abgespeichert. Es 

nimmt dann auf der Diskette 2k ein und wird nach- 

her mit Symbol after 32:hi=himem+1:load“name“ ‚hi 

wieder eingeladen. 

Nach dem Start werden 4 Fenster installiert. Im obe- 

ren befindet sich der Zeichensatz, in der Mitte ist ein 

Edit-Fenster und ein Fenster, das die Werte der Zei- 

len in Hex und dezimal ausgibt. Das untere Fenster 

ist für Anweisungen und Eingaben zuständig. 

Zu Beginn wird ein Zeichen ausgesucht (über Joy- 

stick oder mit dem Cursorblock) und mit Fire oder 

Copy angeklickt oder man kommt mit “P“ in die 

Laderoutine. 

Danach erscheint das Zeichen im Edit-Fenster sowie 

daneben in der Originalgröße 

Mit dem Joystick/ den Cursortasten wird es nun edi- 

tiert (Fire oder Copy löscht oder setzt einen Punkt). 

Folgende Edit-Funktionen sind zusätzlich eingebaut: 
= Drehen des Zeichens um 90 Grad 

Invertieren des Zeichens 

Spiegeln senkrecht 

Spiegeln waagerecht 

Zum Saven oder Laden 

Zeichen o.K., neues editieren 

Löschen des Zeichens 

Originalmatrix übernehmen 

Speichern der Matrix, wird in die Original- 

matrix des nächsten Zeichens geschrieben (zum 

Kopieren) 

Ein Programm so recht für die CPC-User, die oft mit 

selbsteditierten Zeichen arbeiten wollen und bisher 

nicht das richtige „Handwerkszeug“ dafür zur Ver- 

fügung hatten. (JE) 
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_LISTING _ 


BE schneider) 
| aktiv 


"....„..n..n nn. nnn 


x CHAREDIT 


2 * 
3-08 VON * 
a '%* WOLFGANG KUETING * 
5 '# FUER * 
6 ’* SCHNEIDER AKTIV * 
7% CPC 664/6128 je* 
8 N RRRRHHRRRHIRISRIRIETETRIESESESESESESESESESESESETEN 


18 ON BREAK GOSUB 818 

28 MODE 1:INK 8,8:INK 1,26:INK 2,14 
:INK 3, 18:BORDER 6 

38 KEY DEF 9,1,88:KEY DEF 1,1,9:KEY 
DEF 8,1,8:KEY DEF 8,1,11:KEY DEF 2 
‚1,10 

48 DEF FNb(t)=bit(®@,t)*128+bit( 1,t) 
#64+bit( 2,t) #32+bit(3,t) *16+bit(4,t 
)*#8+bit(5,t)*4+bit(6,t)*2+bit(7,t) 
SB PAPER 1:PEN 8:CLS 

68 SYMBOL AFTER 256:ct=HIMEM:SYMBOL 
AFTER 32:c1=HIMEM+1 

78 LOCATE 1,14:PRAINT"CHAREDIT"CHRA$( 
13) "{CTALY} "CHA$S( 164)” by"CHA$C 13 
J"{CTALY} softy-"CHRA$SLC 13) "{CTALY} 
SOFT"CHR$C 13) "{CTALY} 7/1986” 

88 WINDOW 1,48,1,18:PEN 1:PAPER 8:C 
LS 

98 WINDOW#1, 12,19, 12, 19:PEN#1,2:PAP 
ER#1,3:CL541 

188 WINDOW#2,1,48,21,25:PEN#2,1:PAP 
ER#42,2:CL5#2 

118 WINDOW#3,25,38, 12, 19:PEN#3,2:PA 
PER#3, 1:CL5#3 

128 MOVE 326,282:DRAWR 23,8,3:DRAWR 
8,-22:DRAWR -23,8:DRAWR 8,22 

138 DIM bit(7,7),h(8,8) ,old(7,7) 
148 x=1:y=3:xm=1:ym=1:com$="DISWPON 

L{CTALH}{CTARLIFTCTALKILCTALYIIXC” 
158 s$="":FOR t=32 TO 255:s$=s$+CHA 

$Lt):NEXT t 
168’ * 

MM## + 
178 CLS 

188 PRINT#2,"{CTALL}Bitte das zu ed 
itierende Zeichen aus-{3 Leerstelle 

n}suchen und mit <FIRE> bestaetigen 


HAUPTPROGRA 


198 PRINT:PRINT:PRINT s$ 

288 t$=INKEY$:LOCATE x,y:a$=COPYCHRA 
$( #48) :PRINT "{CTALX}"a$”"{CTALX}”:LO 
CATE x,y:PAINT a$:TAG:MOVE 338,198, 
3:PAINT a$; :TAGOFF 

218 FOR t=1 TO 18:NEXT:IF t$="" THE 
N 288 

228 SOUND 138, 188+ASC( a$) 

238 t$=UPPER$( t$) :0o=INSTRA( com$,t$) 

248 IF o=5 THEN 528 

258 IF 0o=9 THEN x=x-1 ELSE IF o=18 

THEN x=x+1 ELSE IF o=11 THEN y=y-1 


81 


akt 


ELSE IF o=12 THEN y=y+1 

268 IF o=13 THEN sign=ASC( MID$LS$,x 
+((y-3)*#48) ,1)) :IF old<>2 THEN old= 
8@:FOR t=8 TO 7:FOR i=® TO 7:old(t,i 
J=8:NEXT i,t:6G0TO 318 

278 IF o=13 THEN 318 


258 IF x>48 THEN x=1 ELSE IF x<i TH 
EN x=48 

298 IF y>B THEN y=-3 ELSE IF y<3 THE 
N y=B 


388 GOTO 288 

318 LOCATE 1,1:PRINT"{CTALX} ";a$;” 
6” ;HEX$LASCLAa$) ,2);” : ";ASCLa$);" 
{CTALX}”; :WINDOW SWAP 1,8 

328 PRINT#42,"{CTALL}Bitte das Zeich 

en editieren und mit <N> bestaetige 

n." 

338 x3=-8:y3=-®:him-HIMENM+1+[( sign-32 
)#8) 

348 FOR t=him TO him+? 

358 i$=BIN$( PEEK(t),B) 

368 FOR u=1 TO 8 

378 IF MID$Ci$,u,1)="1" THEN bit(x3 
‚y3)=1:LOCATE x3+1,y3+1:PRINT"{CTAL 
X) {CTALX}”; ELSE bit(x3,y3) -8:L0CA 

TE x3+1,y3+1:PRINT"” ”; 

388 x3=x3+1:NEXT u:x3=9:y3=y3+1:NEX 
Tt 

398 IF old=8 THEN old=1:FOR t=B TO 

7:FOR i=8 TO 7:old(li,t)=bit(i,t):NE 

xT i,t 

488 GOSUB 578 

418 u MATRIXFHH 

428 t$=UPPER$( INKEY$) 

438 LOCATE xm,ym:PRINT CHRA$( 233) ; 
448 LOCATE xm,ym:IF bit(xm-1,ym-1)= 
1 THEN PRINT”{CTALX} {CTALX}”; ELSE 
PRINT” ”; 

458 IF t$=""” THEN 4208 

468 SOUND 138, I8*#ASC(t$) 

478 o=INSTRAlcom$,t$) :IF o=8 THEN 42 
) 

488 IF 0o=9 THEN xm=xm-1 ELSE IF o=1 
® THEN xm=xm+1 ELSE IF o=11 THEN ym 
=ym-1 ELSE IF o=12 THEN ym=ym+1 

498 IF 0o=13 THEN bit( xm-1, ym-1)=ABS 
C(bit(l xm-1,ym-1)-1) :GOSUB 578 


588 IF xm>8B THEN xm=1 ELSE IF xm<1 
THEN xm=8 

518 IF ym>8 THEN ym=1 ELSE IF ym<1 
THEN ym=B 

528 ON o GOSUB 688,638,648,658,668, 
770,780,798 

538 IF o=14 THEN GOSUB 888 

5a8 


S58 IF 0o=16 THEN WINDOW SWAP 1,8:60 
TO 178 
568 IF 0o<9 THEN GOTO 338 ELSE GOTO 


_LISTING 


428 

578 FOR t=8 TO 7:s(t)=FNb( t) :LOCATE 

#3,1,t+1:PARINT#3,"&";HEX$Cs(lt) ,2);” 
: :DEC$CSCt),"{3 #3”); :NEXT t 

588 SYMBOL sign,s(®),s(1),s(2),s(3) 
‚s(4) ,s(5),s(6),s(t”7) 

598 TAG:MOVE 338, 198,3:PRINT CHR$( s 

ign) ; :TAGOFF :RETURN 

688 FOR t=8 TO 7:FOR i=-8 TO 7:h(7-i 
‚t)=bitlt,i):NEXT i,t 

618 FOR t=8 TO 7:FOR i=-8 TO 7:bitlt 
‚i)=h(t,i):NEXT i,t 

628 GOTO 578 

638 FOR t=8 TO 7:FOR i=8 TO 7:bitli 
‚„t)=ABS(bit(i,t)-1):NEXT i,t:60T0 $ 

78 

648 FOR t=8 TO 7:FOR i=8 TO 3:hli,t 

J=ebitli,t):bit(i,t)=bit(7-i,t):bit(l 

9-i,t)=hli,t):NEXT i,t:6GOTO 578 

658 FOR t=8 TO 3:FOR i=-8 TO 7:hli,t 

J=ebit(i,t):bitli,t)=bitli,7-t) :bit( 

i,7-t)=h(i,t) :NEXT i,t:60TO 578 

668 PRINT#2,"{CTRALL}<L>aden oder <5S 

>aven” 

678 t$=UPPER$C INKEY$) :IF t$="" THEN 
678 

688 IF t$="L” THEN z=1 ELSE z=® 

698 PRINT#2,"”{CTALL}Bitte Filename 

eingeben: {B .}{B CTRAL-H}"; :INPUT#2 
„""F$:F$=LEFT$CH$,B) +".chr" 

788 PRINT42,"{CTALL}Bitte Disc einl 

egen, <ENTER>":CALL &BBd6 

718 IF z=1 THEN 738 ELSE 728 

728 SAVE f$,b,cl,ct-c1:6G0T0 748 

738 SYMBOL AFTER 32:hi=HIMEM+1:LODAD 
f$,hi 

748 PRINT42,"{CTALL}<W>eiter aender 

n, <N>eustart oder <E>nde"” 

758 t$=UPPER$( INKEY$) :IF t$="" THEN 
758 

768 IF t$="W" THEN PRINT#2,"{CTALL} 
":0=16:WINDOW SWAP 1,8:RETURN ELSE 

IF t$="N" THEN RUN ELSE PEN 1:PAPER 
8:MODE 1:CALL EBBBB:END 

778 FOR t=B TO 7:FOR i=-@ TO 7:bitli 
‚t)=old(i,t) :NEXT i,t:old=3:G0TO 57 

] 

788 o=16:RETURN{3 Leerstellen} 

798 FOR t=8 TO 7:FOR i=8 TO ?:bitli 
‚t)=8:NEXT i,t:60T0 578 

888 FOR t=8 TO 7:FOR i=-®8 TO 7:oldli 
‚t)=bit(i,t):NEXT i,t:old=2:RETURN 

818 CALL EBBBB:CALL EBBAE:MODE 2:EN 


Wir wollen hier keine 
Gratiswerbung — es fin- 
dın sich auch die Ver- 
treiber jener Soft- und 
Hardware, die bei uns 
nicht auf Gegenliebe 
stieß — machen, aber ein 
Testbericht ist völlig 
sinnlos, wenn wir nicht 
auch mitteilen, wo das 
Besprochene zu beziehen 
ist. Leider können nicht 
alle Händler berücksich- 
tigt werden, die die 
Ware im Sortiment füh- 
ren. Dies soll nur ein 
letzter Hinweis für den 
jenigen Interessenten 
sein, der bei seinem 
Fachhändler auf leere 
Regale stieß. 


Koronis Rift (7/87) 
Enduro Racer (9/87) 


Activision Deutschland 
GmbH 

Postfach 760680 

2000 Hamburg 

Zombi (7/87) 

Reisende im Wind (7/87) 
Ballbreaker (7/87) 

Die Formel (8/87) 
Greyfell (8/87) 

One (8/87) 

Bride of Frankenstein 
(8/87) 

Dogfight (8/87) 
Kinetik (8/87) 

OCP Art Studio (8/87) 
Spy vs. Spy (9/87) 
Challenge of Gobots 
(9/87) 

Triaxos (10/87) 
Starfox (10/87) 


ariolasoft GmbH 
Postfach 1350 
4830 Gütersloh 


Proword (10/87) 


Arnor (Deutschland) 
Hans-Henny-Jahn-Weg 21 
2000 Hamburg 76 


Vereinsverwaltung 


„Byte me’-Computer- 
systeme 
Wilhelmstraße 7 
5240 Betzdorf 


Tips & Tricks zum 
CPC Band 2 (8/87) 
MS-DOS-Führer (9/87) 
Peeks und Pokes 

zum CPC (9/87) 
Maschinensprachebuch 
zum CPC (9/87) 


Data Becker 
Merowingerstr. 30 
4000 Düsseldorf 


Dirman (10/87) 
Tracer (10/87) 


D. Gunkel Software 
Jülicherstr. 312 
5700 Aachen 


CPC-Com DFÜ- 
Programm (7/87) 


Holtkötter Versand 
Albert Schweitzer Ring 9 
2000 Hamburg 70 


Siren Software (7/87) 


PRB8-Soft 
Erbachshof 1 


Ace of Aces (7/87) 


Rushware GmbH 
An der Gümpgesbrücke 24 
4044 Kaarst 2 


Drucker DMP 40000 
(7/87) 


Fachhandel 


Star Writer PC (9/87) 


Star Division 
Uelzener Str. 12 
Lüneburg 


SERVICE 


Delta 4 PC-Datei (7/87) 
1ST-Word Plus PC-Text 
(7/87) 

RS232 Schnittstelle 
von Pace (7/87) 

Pitstop II — PC 1512 
(9/87) 


Schneider Data 
Computer Vertriebs 
GmbH 

Rindermarkt 8 

8050 Freising 
Markenlaufwerke zum 
Bausatz (10/87) 


NEC Deutschland 
Postfach 
8000 München 


NBB (TEAC) 
Gewerbegebiet 
8036 Herrsching 


| aktiv 


Magic Brush (9/87) 
Stairway to Hell (9/87) 
Donkey Kong (9/87) 
Express Raider (9/87) 
Prohibition (10/87) 
Gremlin Take 4 (10/87) 
Shadow Skimmer (10/87) 
Ziggurat (10/87) 

Montie Mike’s 

Deathride (10/87) 


Waldeck Software 
Tulpenstr. 30 
2870 Delmenhorst 


Bezugsquelle 
Bausatz (10/87) 


P. Konrady 

GE-Soft 
Graurheindorferstr. 21 
8036 Herrsching 

Tel. 0228/694221 


Suche billige Spiele f. CPC 
464 (nur Tape!). Listen an: 
Thomas Stickel, Lindenstr. 
28, 7907 Langenau 
CPC-Computer-Club ‚Magic‘ 
sucht noch Mitglieder aus 
aller Welt! Einmalige Gelegen- 
heit! Listen an Arnd Ziese- 
mer, Gabelsbergerstr. 18, 
7800 Freiburg. Tel. 442829 
v. 19—20 Uhr! Bis dann! 
Arnd verlangen! 

Achtung! CPC-User! Verk. 
Orig.-Softwre f. CPC, Kass. 
u. Disk. wg. Systemwechsel. 
Außerdem MP-Netz-TV-Mo- 
dulator u. 5 1/4-Laufwerk 
(BASF) — Doppelkopf. 
Schreibt an: H. Kretzschmar, 
Postfa. 210405, 4100 Duis- 
burg 1 

Typenraddrucker Olivetti 
Dy211 (NP 2.000,— DM) f. 
700,— DM zu verkaufen. Ser. 
u. par. Schnittst. umschalt- 
bar, 16 Zeichen/Sek. m. 2 
Typenr., 1A-Zustand m. 
Handbü. Infos: Tel. 0203/ 
2833116 od n. 17 Uhr 
0203/33 73 83 

Suche f. CPC 6128 Prog. auf 
Disk. f. Modellbahn zum 
Steuern, System Märklin- 
Digital. Robert Schulte, 
Schützenstr. 2, 5900 Siegen, 
Tel. 0271/51546 ab 18 Uhr, 
außer 17.—-30. Sept. 


SUCHE Print Manager, The 
Advanced Art Studio m. 
Handbuch, Protext-Prowert, 
Promerge, Maxam, Screen- 
saver zu Copyshop! Habe alle 
CPC Copy-Prog. u. neueste 
Spiele! Stefan Westner, Hoch- 
bergweg 34, 7070 Schwä- 
bisch-Gmünd. PS: Habe 6128 
Disk.! 

** Schneider PC 1512 ** 
Verk. Filecard 22 MB boot- 
fähig; 2. Laufwerk sowie div. 
Software: Textverarb., Spiele 
(Schach, Space Invader ...), 
Utilities preiswert. Tel. 02244/ 
381l 

ACHTUNG HANDWERKER]! 
Super—Handwerkerpaket 
zum unglaublichen Preis. Für 
IBM-—PC u. Kompatible, 
Infos gg. Freiumschlag, Georg 
Huonker, Erlenbachhof, 
7463 Rosenfeld-Leidringen 
Verk. Orig.—Prog.! 3‘ Disk.! 
Mission Elevator u. Copy Ma- 
ster, St. 30,—; zus. 50,—. 
Suche Kontakt zu zuverl. 
Tauschpartner, only Disk. 
Call 05828/414, melden bei 
Dieter Schenk, Almstorf 10, 
3119 Himbergen 3 
Universelles Dateiverw.—Prog 
£. CPCs (22K Datenspeicher). 
C/D 25/35,— DM. Info: C. 
Günther, Luitpoldstr. 9, 
8034 Germering 


CPC-COMPUTER CLUB 
FÜSSEN 
Wir suchen neue Mitglieder 
aus aller Welt! 
Bitte Info anfordern! 
Markus Kehle 
v. Freybergstr. 61 
8958 Füssen — Tel. 08362/ 
6645 — Anmeldung auch 
per Telefon! 
Achtung! Ich löse meine Prog- 
sammlung auf! Alles Origi- 
nale! 50 % des Neupreises! 
Info gegen frank. Rückum- 
schlag o. Anruf bei: Manfred 
Lipowski — In der Waune 165 
4620 Castrop Rauxel 4 — 
Tel. 02305/72237 
PC: Liga-Verw. 4—22 Vereine 
+ alle Ergebn. der F-Bundesl. 
von 1963—1987 VK 45—-NN 
49,— 
M. Koethe, Medersbach 6 
8413 Regenstauf 

HEY, FREAKS 
Ich suche einen einzelnen 
Farbmonitor und Drucker !!! 
Angebote an: 
Jürgen Schwanzer 
Hauptstraße 33 
8744 Mellrichstadt 
Der A-U-C sucht Schneider- 
Clubs zur Zusammenarbeit 
in einer großen Gemein- 
schaft! Ziel: Problemlösun- 
gen/Anfäng.-Hilfe / Interes- 
senvertretung. Info geg. Rück- 
porto bei Dieter Moeckel, 
Wunsiedler-Str. 11, 
8591 Thiersheim 
Suche dringend CPC-Club 
oder User im Raum Fulda 
zwecks Kontakt mit Gleich- 
gesinnten u. Einstiegshilfe 
am CPC 6128. Adr.: Thomas 
Lorösch, Am Steinberg 10, 
6405 Eichenzell-Kerzell 
Tel. 06659/2839 
10 Spiele f. CPC 464 auf 
Kass. f. 30,— DM (Scheine im 
Brief) bei Bernd Ehring, 
Eisackstr. 9, 1000 Berlin 62. 
Keine Listen. 
An 6128-Anwender! Biete 
zum Tausch bzw. zum Kauf 
viel selbstgestrickte Prog. 
Prog.-Liste kann angefordert 
werden (3,— DM in Briefm. 
beilegen) bei Heinz Gärtner, 
R.-Koch-Str. 5—7, 
6803 Edingen 
Bäckereiprog. f. CPC 6128. 
Schreibt Rechn., Lieferschei- 
ne f. 16 Kunden u. Filialen. 
Verwaltet Bestand u. Retou- 
ren, erstellt Backzettel u. 
Rezepte. Info v. B. Abels, 
Scharhörnstr. 10, 2956 Moor- 
merland 


Verkaufe Copy-Master (RSE) 
35 ,—; Schneider Basic-Kurs 1 
u.2 je 25,—; Data Becker 
Schulbuch u. Trainingsbuch 
je 20,—; Master Chess 12,—. 
Hans-Gerd Erlemann, Ohring- 
str. 3, 4352 Westerholt 

* CPC-464-Schneider * 
*CPC-6128/CPC-664* 

Tausche Software auf Tape f. 
Schneider Computer!!! Su- 
che dringend Datenverw., Si- 
lent Service. Liste an An- 
dreas Günther, Bürgermeister- 
Trupp-Str. 25, 6700 Lu.- 
Oppau 
Suche Sportspiele (z.B. World 
Games, Indoor Sports), 
Adventures (Short Circuit 
o.ä.) u. Geschicklichkeits- 
spiele (z.B. Marble Madness), 
Tausch z.B. gg. Winter Ga- 
mes. Antwort an: Thomas 
Sprünken, Händleweg 9, 
8858 Neuburg/Donau!!! 
Verk. umständehalber meine 
Schneider-Software wie z.B. 
Barbarian, Antiriad, Levia- 
than, Saboteur II u. Merce- 
nary. Dies sind alles Originale 
(keine Raubkopien!). Liste 
bei: Dieter Köhler, Brand- 
stätterstr. 26, 8501 Cadolz- 
burg 
Ich verk. folgende Orig.- 
Prog.: Schneider-Basic-Lehr- 
buch 25,—; Headline für alle 
CPCs 80,—; A View to aKill 

Disk.) 20,—; Dark Powers 

Disk.) 15,— DM; Richard 
Cloots, Tel. 02451/46608 
* Tausche * Liste gg. frank. 
Rückumschlag. Adresse: 
Andreas Ludwig, Wilhelmstr. 
19, 6501 Budenheim 
Suche Chip Sonderheft 1, 
2, 3 Schneider 464 Software 
auf Disk. Angebote an Rüdi- 
ger Kruse, Walbeckerstr. 51, 
3332 Grasleben, Tel. 05357/ 
1335 
CPC 464 grün u. DDI 650,—; 
6 Data Becker Bücher 220,—; 
alle CPC Internat. 110,—; 
Sonderhefte (4 CPC/2HC) £. 
60,—; 13 Leerdisk. 75,—; 
3 Prog. (Hitchhiker’s, Cyrus 
2, Superpack 80) 195,—. 
Auch einzeln. 
Tel. 07351/71754 
Textomat Plus u.a. Program- 
me f. CPC 6128 gesucht! 
A. Krallmann, Beringallee 1, 
2940 Wilhelmshaven, Tel. 
04421/83552 


Ruf mal an: 05254/60501 


__BÖRSE | 


Das Superangebot: eine Disk. 
voller Spiele u. Anwend. f. 
nur 10,— DM. Zusammenstel- 
lung nach Eurer Wahl. Fordert 
Listen an bei: Lars-Peter 
Kuhr, Kaiser-Heinrich-Str. 7, 
8354 Metten 1. 100% Antw. 
Biete CPC 6128, kaum ge- 
braucht, Extras u. SW f. 600 
DM (dBase, CBasic, COBOL- 
Compiler, Tasword, Mini- 
Office, Assembler, Monitor, 
Lisp u. div. Utilities = 10 
Disk.), alles zus. nur 798,— 
DM von Kremer, T. 02205/ 
3038 


aller Art. Biete Spiele etc. od. 
Geld (Tel. 08334/1513) 
Zuschriften m. Listen an: 
Michael Deni, Oberthal 4, 
8944 Grönenbach 

Verk. Cumana 3-Zoll Zweit- 
floppy u. Vortex 5 1/4 Zoll- 
Adapter gg. Gebot, Tel. 
706971 ab 17 Uhr 


LICHTGRIFFEL 
mit Programm für CPC 
464 oder CPC 664 + CPC 
6128 nur 49,— DM. Ver- 
sand gegen Scheck/Nach- 
nahme. Info gratis! 

Fa. Schißlbauer, Postfach 
1171S, 8458 Sulzbach, 
Tel. 09661/6592 bis 21h 


Tausche Software aller Art. 
Liste an Michael Schaefer, 
Rhein-Maas-Str. 3, 5100 
Aachen. Nur Tape (464) 
Verkaufe orig. Kass.-Soft- 
ware z.B. Werner; Winter 
Games; Moon Buggy je 20,— 
DM. Habe auch noch andere! 
Michael Meissner, Walchen- 
seestr. 35, 7000 Stuttgart 
50, Tel. 0711/532711. Auch 
Softw.-Tausch. Nur Kass. 
Achtung! CPC 6128-User!! 
Tausche Software m. Freaks 
aus ganz Europa. Sendet 
Eure Listen an (nur Disk. 3‘*) 
Ralf Korpies, Jahnstr. 25, 
8370 Regen. Hoffentlich 
bald!! 


inkl. Lit., Software f. 950,— 
DM. Tel. 04261/835588 
ab 19 Uhr 


AVALON! Achtung: Ab Nov. 


ist es soweit! AVALON — das 
Grafik-Adventure is coming!! 
338 KB m. Sound! bis bald: 
TPJ. Thorsten Blum, Kasta- 
nienweg 2, 5316 Hillscheid 


Verkaufe: They Sold a Mil- 
lion II (gebraucht) f. nur 
40,— DM. Info: Kai Schwett- 
mann, Steubenstr. 6, 4990 
Lübbecke 1, Tel. 05741/ 
1686 (f. CPC) 

Verkaufe CPC 464 m. Floppy, 
Drucker, 100 Spiele, Comp.- 
Zeitungen, Handbücher u. 
Computertisch. VB: 1.800,— 
DM Gerd Holz, Lützerather- 
str. 39, 5000 Köln 91, Tel. 
0221/86290 

Suche: Variatus Umbausatz 
464 nur in gutem, kompl. 
Zustand. Verkaufe: Je 2 x 
464, grün, DDI, FDI, Vortex 
SP 256, Haube, Dr.-Kabel, 
sehr viel Software u. Lit. 
Neupreis je mind. 3.500,— 
DM, Verk.-Preis je 1.750, — 
VB. Tel. 0214/54928 
CPC-User-Club Kinzig sucht 
noch Mitglieder u. Kontakte 
zu anderen Clubs in der nä- 
heren Umgebung. Wer könnte 
einem unserer Clubmitgl. bei 
Schneider ComPack weiter- 
helfen? CPC-Userclub Kin- 
zig, c/o Richard Luppert, 
6456 Langenselbold, Garten- 
str. 18, Tel. 06184/2307 
Suche zwecks Clubgründung 
Mitglieder (CPC-User) im 
Raum St. Gallen (CH) u. 
Rheintal. Interessenten wen- 
den sich an: Frank Hengart- 
ner, Vorburg, CH-9473 Gams 
(SG) 

An alle Schneider-Computer- 
Freaks. Wir, der Schneider- 
Amstrad-Computerclub, su- 
chen noch Mitglieder. Alter: 
10—15 Jahre. Clubbeitrag 

70 Pf. im Monat. Zeitung 
kommt monatlich kostenlos. 
Näheres: Chr. Hartmann, 
Sandweg 115, 2900 Olden- 
burg 

Suche Tauschpartner! Tausche 
Software aller Art auf Disk! 
Auch Zeitschriften! Suche 
Chemie-, Copy- u. Sound- 
Programme! Bitte m. Liste 
an: Robert Theuer, Lange 
Minute 23, 2819 Morsum 
100% Antwort 

Tausche Grünmon. u. 4 Su- 
per-Spiele (Bomb Jack usw.) 
um 100,— DM gg. Farbmon. 
Grebor Brokamp, Upn Tim- 
pen, 4598 Cappeln-Tenstedt, 
Tel. 04478/487 

** CPC Computer Club ** 
Wir suchen noch Mitglieder 
aus aller Welt. Bitte Info an- 
fordern! Markus Kehle, v. 
Freybergstr. 61, 8958 Füssen/ 
Allgäu. Tel. 08362/6645 


Tausche Softw. f. 6128; ko- 
stenlose Liste anfordern bei 
Andreas Rohl, Brückenstr. 

8, 2051 Kollow 

Verk. CPC 464 Farbe, 512 
KB, DDI-1, FD1, Drucker 
NLQ 401, dBase II, Multi- 
plan, Wordstar, div. Spiele u. 
Bücher, neu über 3.000, — 
DM, £. nur 2.200,— DM. Tel. 
ab 18 Uhr 04534/7952 
Sicherheitskopien von allen 
3“ Disk? Orig. u. Zieldisk. m. 
5,— DM an: R. Ullrich, Daim- 
lerstr. 6a, 2850 Bremerhaven 
Verk. Orig.-Kass. f. CPC 464 
zw. 4,— u. 20,— DM. Liste 
gg. 80 Pf. Briefm. bei Steffen 
Schäfer, Osianderstr. 11, 
7410 Reutlingen 22 

Verk. CPC 6128, Grünmon. 
(9 Mon.), Vortex F1-XRS LW 
m. Schnittst. u. DMP 2000: 
VB 1.890,— DM kompl. 
Dazu div. Prog.: Wordstar, 
dBase je 120,—; Starwriter 
3.0, Fibu MT je 150,—, Ver- 
einsverw. 60,—; div. Spiele (D 
+ C), Bücher etc. Tel. 07544/ 
4130, E. Städele 
VERKAUFE f. CPC 464: Su- 
per Tape-to-Tape-Kopierprog. 
m. allen Raffinessen, Speed- 
lock, Headerless, Turbola- 
der? Kein Problem. Header- 
reader: 58724 Bytes frei!!! 
Bis 4000 Baud. Nur 39,70. 
A. Buhl, Gegen den Woog 14, 
6799 Altenglan. Tel. 06381/ 
1830 

Achtung — Softwaretausch 
Tausche Softw. aller Art. Für 
CPC 6128 auf Disk. Nur bei 
rascher Bearbeitung! Thor- 
sten Stumpf, Balthaar-Neu- 
mannstr. 2, 7520 Bruchsal 
Hilfe! Suche Druckeranpas- 
sung f. CPC 6128 Drucker 
GP 500 CPC Seikosha f. Su- 
perhardcopy. Tausche Atari- 
Computer 800XL m. Data- 
sette, Spielen, Malprog. gg. 
Softw.f. CPC 6128. Dieter 
Bark, Bremsbergallee 2, 2392 
Glücksburg 2 

Suche Kopierprog. Tape-Disk. 
sowie Anl. zu diesen Prog. u. 
zu Turbo-Pascal f. CPC 6128. 
Bitte Angebote schicken. 
Verk. Orig.-Kass.-Softw. billig 
Liste gg. 0,80 DM Rückporto 
v.R. Klein, Finsterheckstr. 
22, 6580 Idar-Oberstein 1 
Weg. Systemwechsel: Joyce 
Orig.-Programme: dBase 2 m. 
Handbuch 120,—; RH-dat 
50,—; Fairlight 30,—. Tel. 
07031/805752 


BÖRSE 


CPC 464 (grün), Vortex Sp.- 
Erw. 320K, Vortex Doppel- 
floppy 5.25“ “, orig. Word- 
star, CBasic-Compiler u.v.a. 
VB 1.200,— DM. Bücher zu 
Schneider (Prog.-Sprachen, 
Betriebssystem, dBase etc.) 
Liste anfordern ab 19 Uhr: 
Tel. 06421/22470 

Verk. meine Originale. Zum 
Teil zu Schleuderpreisen. 
Ruft an unter 07456/6151. 
Mark verlangen! 

Achtung! Verk. Datenver- 
arb.-Prog., das die 128 KByte 
des CPC 6128 voll ausnutzt 
bei schnellster Verarbeitung. 
Umfangreiches Druckermenü. 
Rene Fischer, Teckweg 12, 
7909 Dornstadt 

Verk. Orig.-Kass.: Soul of a 
Robot, Molecule Man, Kane, 
Super Pipeline 2, Star Com- 
mando zus. f. nur 25,— DM 
(Vorauskasse). Neupreis wäre 
60,—. Nur schriftlich an Wolf- 
gang Röttger, Fehmarnwin- 
kel 16, 23 Kiel 1 

PC 1512/640K, MM/SD: 

VB 1.250,— DM. 3-M-Trok- 
kenkopierer 151 m. 250 Blatt 
Papier: VB 250,— DM. CPC- 
DFÜ: RS-232 (V24) m. Soft- 
w. VB 130,— DM. 

Tel. 09544/2398 


DISKETTEN m. Gar. 

3° Markendisk. DM 6,50 2CF 
Allg. Austro-Agent. Ringstr.10 
D-8057 Eching, Tel.: 08133/ 
6116 


Lauffähiges, professionelles 
CAD-Prog. f. 6128 sucht Pit 
0271/55463. Keine Firmen- 
angebote, nur 6128er Anwen- 
der! Privat! 

Suche f. CPC 6128 Akustik- 
koppler u. Drucker, bitte 
preiswert! Da ich noch in der 
Lehre bin! Tel. 06753/2977, 
Helmut 

Verk. CPC 464, Grünmon., 

2 Orig.-Kass., Spiele, Zeit- 
schr. u. 1 Buch, 1 Jahr alt, 

f. 800,— DM. Bernd Holz- 
ner, An der Steige 5, 8801 
Wettingen, Tel. 09869/ 

754 

Orig.-Spiele f. CPC zu verkau- 
fen! Airworf, Combat Lynx, 
Infiltrator, Hunter Killer, Red 
Arrows, Strike Force Harrier, 
Marsport. Je Disk. 25,— DM. 
Lotto 6 aus 49: Disk. 30,— 
DM. Game Box 1: Kass. 10,— 
DM. Tel. 089/6370808 ab 

18 Uhr 


Wer kann helfen? 

Ich suche dringend eine Mög- 
lichkeit, um die 64K-Spei- 
chererw.-Karte der Firma DA- 
TA-MEDIA auch unter CP/M 
2.2 m. dem CPC 464 u. DDI 
l nutzen zu können. Leider 
ist die Firma erloschen, u. 

die Orig.-Softw. deshalb nicht 
mehr erhältl. Günther Beh- 
rendsen, Dorfstr. 12a, 2086 
Ellerau, Tel. 04106/71589 
Tauschpartner gesucht! 

Prog. aller Art wie z.B. Spiele 
Grafikprogramme etc.! 
Schickt Eure Listen an: 
Frank Vielstädte, Tecklen- 
burger Weg 28, 4836 Her- 
zebrock-Clarholz 

Ich suche Software f. CPC 
6128. Schicken Sie Ihre 
Angebote an: Manfred Ste- 
ger, Postf. 1209, 6837 St. 
Leon-Rot 2. auch Public- 
Domain u. CP/M-Software. 
Public Domain User Gruppe. 
Wir geben CP/M-Programme 
auf 3“-Disk. f. CPC u. Joyce 
zu geringem Unkostenbei- 
trag ab; ca. 2000 dok. Prog. 
Cat-Disk. 12,— DM, Info 2,— 
DM. PDUG, Postf. 1118, 
6464 Linsengericht 1 

Verk. Matrixdrucker: Shin- 
wa CP 80 m. Centr.-Schnitt- 
stelle. In sehr gutem Zustand. 
VB 400,— DM. Tel. 089/ 
6370808 ab 18 Uhr 

Suche Zweitlaufw. f. 464/ 
DDI, preiswerte Maus m. 
Softw.; sowie jede Art v. To- 
to u. Lotto Programmen!!! 

T. Born, Kempener Str. 93, 
5000 Köln 60 

* Verk. CPC 6128 * m. 
Drucker DMP 2000, Daten- 
rec., Software f. über 6.000, — 
DM, Disk.-Box f. 56 Disk. 
abschließbar, Bücher f. über 
600,—. NP: über 8.000,— 
DM. VB 2.200 ,,— DM. Tel. 
08431/3127 

Tausche Programme auf Disk. 
(3 Zoll u. 5 1/4 Zoll.) Schickt 
bitte nur bespielte Disk. an: 
T. Dahmen, Vellwig-Str. 33, 
4690 Herne 1. PS. Nicht Vor- 
tex! Super! Super! 

Software aller Art f. 
Schneider CPC zu verkaufen 
bei Michael Deni, Oberthal 1, 
8944 Grönenbach, 08334/ 
1513. Fordert Listen an! 

CPC 464 defekt? Funktions- 
fäh. CPC 464 ohne Tastatur 
f. 130,— DM sowie Grünmon. 
GT 65 £. 130,—. Tel. GE 
0209/25472 


senneide 


aktiv) 


Sonderangebot! Schneider 
PC m. 20 MB Harddisk 
abzugeben, Preis 1.500,— DM 
VB. Ratenzahlung möglich. 
R. Helmecke, Am Falltor 26, 
6301 Staufenberg-Treis. Tel. 
06406/5497 

+ Verk. Orig.-Kass. + The 
Hobbit mit Buch 20,-; Grem- 
lins 15,—, Sorcery 15,-; De- 
fend or Die 10,—; Grand Prix 
Rallye II 10,—. Meldet Euch 
unter 07931/3223! 


Achtung ! Suche ! 
Drucker f. Schneider CPC 
günstig, gut erhalten. Ab 17 
Uhr Tel. 07434/2309 
Gratisinfo für alle CPC-Ver- 
sionen anfordern bei Fried- 
rich Neuper 8473 Pfreimd 
Postfach 72. Postkarte ge- 
nügt 
LTS / Lern- und Trainings- 
software Dr. Kolb Psych.- 
päd. Praxis, Bergstr. 34 
69 Heidelberg, Tel. 06221 — 
474711 .0d. 3035 55 
o LADEN STARTEN 
STAUNEN o 
10 Punkte, die Sie überzeu- 
gen werden: 
1. Das Softwarepaket mit 
optimalem Nutzwert, das nur 
begeistern kann! 
2. Urteil der Fachpresse: 
(CPC-Magazin) „Ein im Preis 
[Leistungsverhältnis unschlag- 
bares Biorhythmuspro- 
amm.‘ 
. BIORHYTHMUS-TOTAL 
+PARTNERANALYSE. 
4. Sehr komfortabler Bild- 
schirm, ausführliche Hin- 
weise und Informat. für je- 
den Tag, doppelte Grafik, 
sehr viel Text. 
5. Bei Druckerbetr. ca. 7 
DIN-A4 Seiten / Monat. 
(Inter. Nebenverdienst) 
6. Mehrseitige Einführungs- 
broschüre. 
7. Läuft auf allen CPC’S 
8. Zur Zeit das umfangreich- 
ste Progr. dieser Art. 
9. Unglaublicher Preis 
(DM 40,—) 
10. Zusätzlich erhalten Sie 
bei Best. gratis ein Mathe- 
matik-Lernprogramm. 
Bestellung an: Hilterscheid, 
2 HH-80, Hofweide 31. 
Tel. 040 / 7301767. 


+ STOP + Schneider-Prog. f. 
CPC 464 zu wahnsinnigen 
Superpreisen. Liste gg. Rück- 
porto bei Thomas Knapek 
jun., Eichenweg 21, 8312 
Dingolfing anfordern. Riesi- 
ge Auswahl zu Superpreisen. 
Da geht die Post ab! 


——————————————————————————————————————————————————————— 


IRRE 


SERIE 


RICHTIG PROGRAMMIEREN 
IN BASIC 


Diesmal wird gesucht 


So langsam nimmt unser 
Softwareverwaltungspro- 
Bann die endgültige 
orm an. Nach der Ein- 
gaberoutine mit Sortier- 
und Speicherprogramm- 
teil sowie den Lösch- 
und Druckroutinen geht 
es in diesem Heft um 
das Suchen. 


Wenn wir nämlich unsere 
Datei angelegt haben 
und ein bestimmtes Pro- 
gramm suchen, weil Sie 
nicht mehr wissen, auf 
welcher Diskette/Kasset- 
te es sich befindet, wäre 
es Unsinn, sich dazu 
dann die gesamte Liste 
über den Drucker ausge- 
ben zu lassen. 


Einfacher ist es, nur den 
Programmnamen, der ge- 
sucht wird, einzugeben 
und den CPC dann su- 
chen zu lassen. Dabei 
muß allerdings sicher- 
gestellt sein, daß nicht 
der gesamte Name einzu- 
geben ist, sondern auch 
Teile des Namens müssen 
ausreichen. 


Daß dies Ihr CPC in her- 
vorragender Weise kann, 
werden Sie feststellen 
können, wenn Sie das 
diesmalige Listing ein- 
gegeben haben und zu 
Ihrem bisherigen 
„Rumpf“-Programm hin- 
Zumergen. 


Wenn Sie zum Beispiel 
„Boulder Dash“ suchen 
und nicht mehr wissen, 
wie Sie es eingegeben 
haben (Boulder Dash 
oder Boulderdash), so 
brauchen Sie lediglich den 
Teil einzugeben, den Sie 
mit Sicherheit wissen: = 
Also „Boulder“ oder 
te oder auch nur 


’ 


Geben Sie allerdings nur 
einen Buchstaben ein, so 
wird das Programm alle 
Softwarenamen, die Sie 
in Ihrer Datei haben und 


die diesen Buchstaben 
irgendwo enthalten, auf 
dem Bildschirm anzei- 
gen. Wenn es dann doch 
nicht der Name ist, den 
Sie suchen, muß die Mög- 
lichkeit des Fortsetzens 
des Suchens von dem 
nächsten Datensatz an 
möglich sein. 


Ferner sollte das Pro- 
gramm auch die Möglich- 
keit bieten, nach dem ge- 
fundenen richtigen Na- 
men einen weiteren Such- 
namen einzugeben oder 
auch zum Menü zurück- 
zukehren. 


Wir können es nicht oft 
genug wiederholen: Alle 
diese Überlegungen sind 
nicht zu unterschätzen 
und dürfen nicht auf 

die leichte Schulter ge- 
nommen werden. Denn 
bevor Sie sich hinsetzen, 
um ein Programm zu 
schreiben und „wild“ 

die Tasten bearbeiten, 
müssen Sie sich unbedingt 
klar darüber sein, was das 
Programm oder das je- 
weilige Programmteil kön- 
nen soll und welche An- 
forderungen Sie an Ihre 
Software stellen. 


So, nun genug der Vor- 
rede, jetzt geht es um 
das diesmalige Listing. 
Zeile 4000 dürfte auch 
den Neueinsteigern klar 
sein: Der Bildschirm 
wird gelöscht. In Zeile 
4010 lassen wir das Pro- 
gramm zum Beschreiben 
der Statuszeile nach 
4980 springen. 


Der Vorteil solcher 
Unterprogramme haben 
wir ja in den vorhergegan- 
genen Folgen immer wie- 
der beschrieben. 


Das Return in 4990 bringt 
uns dann zurück zur Zei- 
le 4020. Dort wird der 
Disketteninhalt gelesen 
(cat) und automatisch 
auf den Bildschirm ge- 


bracht, bevor in den 
nächsten Zeilen abgefragt 
wird, in welcher Datei ein 
Programmname gesucht 
werden soll. Die locate- 
Befehle, die zur Ausgabe 
des Textes benutzt wer- 
den, haben wir in den vor- 
herigen Folgen schon 
mehrmals besprochen 
und dürften Ihnen klar 
sein. 


In der Zeile 4070 geht es 
dann zur Unterroutine 
zum Einlesen der Daten. 
Diese Routine steht ab 
8030 im Programm und 
wurde ebenfalls schon be- 
sprochen. Wenn die Da- 
ten dann im Speicher 
sind, kehrt die Leserouti- 
ne zurück und weiter 
geht esin Zeile 4080, 
4090 und 4100 mit der 
Abfrage, welches Pro- 
gramm gesucht werden 
soll. Der eingegebene Pro- 
grammname wird dann in 
dem String such$ abgelegt. 


Wie immer, haben wir 
auch hier einen solchen 
Namen (aus dem sich die 
Bedeutung leichter her- 
auslesen läßt) gewählt, 
damit Sie sich leichter tun, 
wenn Sie das Listing 

lesen wollen. : 


Denn daß in such$ der 
Name des zu suchenden 
Programmes abgelegt 
wird, leuchtet auch den 
Neueinsteigern in Basic 
leichter ein, als wenn wir 
xyz gewählt hätten. 
Zeile 4110 wandelt den 
eingegebenen Programm- 
namen in die Großschreib- 
weise um. In der gleichen 
Zeile wird c=1 gesetzt, 
damit wir in der Such- 
schleife auch tatsächlich 
mit dem ersten Datensatz 
beginnen. 


Die eigentliche Such- 
schleife umfaßt die 
Zeilen 4120 bis 4140. Als 
Laufvariable wird y be- 
nutzt, die Zahl der im 


Speicher stehenden Pro- 
gramme bestimmt z. Der 
Wert von z wurde in der 
Einleseroutine bestimmt. 
Die Schleife beginnt also 
bei I (durch das Setzen 
von c=] in 4110) und 
läuft bis z; es sei denn, 
daß in 4130 durch den 
instr-Befehl eine Überein- 
stimmung zwischen dem 
such$-String und dem 
Programmnamen (pn$(y)) 
festgestellt wird. 


Wird keine Übereinstim- 
mung festgestellt, ist al- 
so der eingegebene Such- 
begriff innerhalb der 
Namen der Programme 
nicht enthalten, so wird 
dies nach dem Löschen 
des Bildschirmes (in 
4150) durch die Zeile 
4160 gemeldet. Die Zei- 
len 4170 und 4180 die- 
nen nur als Warteschleife, 
bevor es dann durch den 
goto-Befehl nach 4900 
geht. 


Wurde aber doch Überein- 
stimmung festgestellt, so 
wird von 4130 aus die 
Zeile 4200 angesprungen 
und durch die Zeilen 4210 
bis 4260 die Meldung 
über den Inhalt des Da- 
tensatzes ausgegeben. 


Zeile 4270 fragt nun ab, 
ob der Datensatz auf dem 
Drucker ausgegeben wer- 
den soll, bevor in 4280 
durch den input-Befehl 
die Antwort darauf einge- 
geben werden soll. Wenn 
in Zeile 4300 festgestellt 
wird, daß keine Drucker- 
ausgabe erfolgen soll 
(durch Drücken der “N“- 
Taste), werden die nach- 
folgenden Zeilen (also die 
Druckausgabe) übersprun- 
gen. 


Beim Drücken jeder an- 
deren Taste jedoch wird 
der Inhalt des Datensat- 
zes aufs Papier gebracht. 
Interessant wird es wieder 
in den Zeilen 4900 — 
4950. In 4900 wird am 


unteren Bildschirmrand 
eine Hilfszeile gesetzt, 
aus der der Programmbe- 
nutzer dann später er- 
fährt, wie es im Pro- 
grammlauf weitergehen 
kann. 


Er hat nun nämlich die 
Möglichkeit, weiter zu su- 
chen, einen neuen Pro- 
grammnamen zum Su- 
chen einzugeben, in einer 
anderen Datei zu suchen 
oder dieses Unterpro- 
gramm abzubrechen und 
zum Hauptmenü zurück- 
zukehren. Entscheidend 
dafür sind die Befehle 

in den nachfolgenden 
vier Zeilen. 


Zuerst der Fall, daß Sie 
den Programmnamen ge- 
funden haben und nun 
zurück zum Menü wol- 
len. In der Zeile 4910 
wartet das Programm auf 
einen Tastendruck. Drük- 
ken Sie nun die Taste 
“A““ (Tastennummer 69), 
so wird über die Zeile 
2990 das Menü ange- 
sprungen. 


Drücken Sie jedoch die 
Taste “I“ (Taste Nr. 35), 
so wird über die Zeile 
4940 der Inhalt der 
Variablen pn$, ort$ 

und so weiter gelöscht, 
neu dimensioniert und 
dann die Zeile 4000 an- 


gesprungen, wo die Such- 
routine neu beginnen 
kann. 


Wenn Sie einen neuen 
Programmnamen ein- 
geben wollen (in der glei- 
chen Datei), so wird zur 
Zeile 4080 verzweigt, wo 
Sie dann den neuen Na- 
men eingeben können. 
Sie haben aber auch die 
Möglichkeit, Ihren CPC 
weitersuchen zu lassen. 
Dazu wird die “W“-Taste 
gedrückt. Dann setzt in 
Zeile 4910 das Pro- 
gramm den Schleifenzäh- 
ler um eins höher (denn 
es soll ja vom nächsten 
Zeichensatz an weiter- 
gesucht werden) und kehrt 
zur Suchschleife zurück. 
Nach dem Abtippen die- 
ses Teilprogrammes mer- 
gen Sie den alten Teil hin- 
zu. Nun haben Sie schon 
fast ein fertiges Pro- 
gramm, mit dem schon 
allerlei gemacht werden 
kann. 


Noch ein Wort zum Ab- 
schluß für die diesmalige 
Folge: Sicher hätte man 
an einigen Stellen elegan- 
ter programmieren kön- 
nen. Aber diese Programm 
soll ja ein Basic-Demo- 
Programm sein und Sie 
auch zum Mitarbeiten 
und selber Programmie- 
ren anregen. (JE) 


aa08 CLS 
au1ı8 GOSUB 4988 
4929 CAT 


4938 LOCATE 18,22:PRINT"In welcher 
Datei sollen Datensaetze gesucht we 


rden?"” 
49408 
49859 
4968 
4978 
4888 
amen 
49898 
werden soll” 


CLS 


GOSUB 4988 


LOCATE 35,24: INPUT"";dat$ 
z=0:G0SUB 8838 
LOCATE 28,11:PRINT"Bitte den N 


des Programms eingeben," 
LOCATE 27, 12:PAINT"”der gesucht 


4188 LOCATE 37, 15:INPUT"”";such$ 
4118 such$=UPPER$( such$) :c=1 


4128 FOR y=c TO z 


4138 IF INSTA(pn$(y),such$) THEN GO 


TO 4288 
4148 NEXT y 
4158 CLS 


4168 LOCATE 28, 12:PAINT "Gesuchtes 


es sc ss se a T T WJ FF Fe  EEEEEETETEEE 


SERIE 


akti 


Programm >> ";such$;” << nicht gefu 
nden"” 
4178 
4188 
4198 
4288 CLS 

4218 LOCATE 
tensatz hat 
4228 LOCATE. 


FOR w=1 TO 1888 
NEXT w 
GOSUB 4988 


15,8:PRINT"Gesuchter Da 
die Nummer ";y 
15, 18:PAINT"”Programmnam 
e ";pn$(y) 
4238 LOCATE 15, 11:PRINT"Programmlae 
nge : ";1ae$(y) 
4248 LOCATE 15, 12:PRINT"Startfile 
: ";filn$(ly) 
4258 LOCATE 15, 13:PAINT"Disk/Kass-N 
r : ";ort$(y) 
4268 LOCATE 15, 14:PRINT"Bemerkungen 
: ”;bem$(y) 
4278 LOCATE 15,16:PAINT”"Diesen Date 
nsatz drucken ?" 
4288 LOCATE 48, 18:INPUT"”"”, janein$ 
Janein$=UPPER$( janein$) 
IF janein$="N” THEN GOTO 4368 
PRINT #8,"Programmname........ 
esse eine pn yY) 
PRINT #8,"Programmlaenge...... 
een > laahly) 
PRINT #8,"Startfile........... 
ea een  reLnSly) 
PRINT #8, "Disk/Kass-Nr........ 
unseren -—SOrtSLlyY) 
PRINT #8, "Bemerkungen......-.. 
2eneeeeneenennne.t ";5bem$ly) :PAINT 


GOTO 4988 

END 

LOCATE 1,24:PRINT ">W<eiter su 

chen >N<euen Programmnamen >I<n 

neuer Datei suchen >A<bbrechen "; 

4918 CALL &BB86:IF INKEY(59)=@® THEN 

c=y+1:G6G0TO 4128 

4928 IF INKEY(69)=-@8 THEN GOTO 2998 

4938 IF INKEY(46)=-8 THEN CLS:G0TO 4 

088 

4948 IF INKEY(35)=-@® THEN ERASE pn$, 

ort$,1lae$,filn$,bem$:DIM pn$( 280), o 

rt$( 288) ‚,l1ae$( 288) ,filn$( 288) ‚,bem$( 

208) :CLS:GOTO 4888 

4958 GOTO 4918 

4968 LOCATE 1,24:PRINT ">N<euen Pro 

grammnamen eingeben >I<n neuer Dat 

ei suchen >A<bbrechen der Suche”; 

4978 RETURN 

4988 PRINT #1,CHRA$( 24) ;” 
Datensaetze suche 

n ":C 

HR$( 24); 

4998 RETURN 
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Designtelefone 
Gesamtkatalog 3,— DM 


B. V. Steponaitis, 
Obere Straße 30, 8720 Schweinfurt 


BÖRSE 


Suche Pagemaker f. CPC 
6128 u. andere Softw. Biete 
Commodore 16 m. Zubeh., 
Zeitschr., Spielen, 2 Joy—a- 
dapter. Kaufe mögl. billig al- 
les f. CPC 6128. Info: Tel. 
0631/40656 od. Monika 
Duda, Barbarossaring 32, 
6750 Kaiserslautern (m. 80— 
Pf.—Briefm.) 
** SUPER-TOP-ANGEBOT 
Verk. Spitzensoftware f. 10,— 
DM pro Disk.: 100% Rück- 
antwort!! Schreib an Ralf 
Weinzierl, Braungarten 1, 
8354 Metten 
++SUPERANGEBOT++ 
eine Disk. bespielt m. Euren 
Spiele- u. Anwendungswün- 
schen f. nur 10,— DM, For- 
dert Listen an bei: Lars-Pe- 
ter Kuhr, Kaiser-Heinrich- 
Str. 7, 8354 Metten 1. 100% 
Antwort 
Bin Anfängerin u. suche zu- 
verl. Kontakt zu Tauschpart- 
ner (innen)n f. CPC 464 Tape 
u. Disk. Hildegard Schlicker, 
Weilersgrund 58, 5024 Pul- 
heim 
Verkaufe Seikosha GP—-500 
CPC, wenig benutzt, m. Orig.- 
Verp.! Preis: 230/200,—DM 
m./ohne Kabel, incl. 200 
Blatt Papier u. Software auf 
3“ od. Kass. Preis f. Abholer, 
ansonsten plus Porto. Tel. 
04402/6644 
Suche DDI, Lichtgriffel u. 
Speechsynthesizer. Schickt 
Eure Listen an: Markus Hof- 
mann, Waldstr. 5, 8484 
Grafenwöhr 1 
Suche Anschluß an CPC 6128 
Clubmitglieder f. Informati- 
ons- u. Prog.-Austausch. Zu- 
schriften bitte an: Albert 
Polke, Krebsbachste. 16, 
8941 Ungerhausen 
Disk—Controller v. DDI £. 
CPC 464, zum Anschl. eines 
Disk-Laufwerks. Mit CPIM 
Disk 50,— DM. Tel. 06021/ 
52431 
Hallo, Freaks! Mache euch 
eine Sicherheitskopie v. Disk 
3‘ (Rücksendung 1 Tag). 
Orig.—Disk. u. Leer—Disk. u. 
1.-DM an Josef Berger, Sand- 
rartstr. 55, 8500 Nürnberg 90 
***Top Angebot*** 
CPC 464, DDI—-1, GT 64 
inkl. div. Disk., Diskettenbox, 
10 Zeitschr., 1 Joystick, div. 
Softw. f. 1.000,— DM zu 
verk. R. Luhmann, Grüff- 
kamp 16, 2300 Kiel 17, Tel. 
0431397441 


Sampler oder Compilations, wie 
sie auch oft genannt werden, er- 


freuen sich in der letzten Zeit immer 


größerer Beliebtheit. Angefangen 
hat dieser Trend mit dem Sampler 
„They Sold A Million‘, auf dem 
mehrere Spiele zum Preis von 
einem angeboten wurden. Ocean 
machte diesen Trend vor, 

andere Softwarehäuser ahmten ihn 
nach. Die neueste Compilation 
bescherte uns die englische Firma 
Gremlin Graphics, die uns durch 
Spiele der „Monty’’-Serie bekannt 
ist. Im vorliegenden Fall gibt es 
gleich vier Spiele, als da wären: 
Rocco, Thing on a Spring, Project 
Future und Grumpy Gumphrey 
Supersleuth. Erfreulich, daß hier 
kein Lückenfüller eingebaut 
wurde und jedes einzelne eine 
Besprechung wert ist. 


Im Übrigen haben wir bei dieser 
Spielesammlung ganz bewußt auf 
eine Bewertungsgrafik verzichtet, 
um die unterschiedlichen Wertun- 
gen nicht zu verwischen. 


ROCCO — 
HARTER SCHLAGABTAUSCH 
IM RING 


Die Namensähnlichkeit mit einem 


Filmboxer ist wahrscheinlich ein 
„absichtlicher Zufall“. Mit Sicher- 


heit wünscht sich Gremlins Graphics 


den gleichen Erfolg, wie ihn der 
Filmkollege bereits hat. Bei Rocco 
darf der Spieler endlich einmal in 
den Ring steigen und seine Schläge 
an die gefürchteten Gegner Cimbel 
Lin, Ted Matare, Jansen Sind und 
Fighter Bull austeilen. Selbstver- 
ständlich immer schön nacheinan- 
der und streng nach den Regeln 
der Boxkunst. Besiegen Sie alle 
vier, dann ist Ihnen der Weltmei- 
sterschaftsgürtel sicher. 


TEST 


der immer dann hektisch wird, 
wenn jemand zu Boden geht. Je- 
der Treffer entzieht dem Gegner 
Energie, bei Null ist der K.o. fällig. 
Zäh wie Schwergewichtsboxer al- 
lerdings sind, werden drei Nieder- 
schläge notwendig, um als Sieger 
aus einem Kampf hervorzugehen. 
An der Unbeweglichkeit der Kon- 
trahenten liegt es auch, dals nur 
Kopfschläge möglich sind. Freuen 
Sie sich also, daf3 Sie es mit einer 
Computer-Simulation zu tun haben 
und nicht selbst die Beulen davon- 
tragen. 

Die Grafik ist recht gut und sauber 
herausgearbeitet, so dafs auch Ein- 
zelheiten deutlich zu erkennen sind. 
Wird ein Boxer getroffen, so sprit- 
zen Schweilstropfen weg. Bei einem 
K.o. strauchelt ei ein wenig und 
sinkt dann langsam zu Boden. Im 
Ring hat man es allerdings immer 
nur mit dem gleichen Gegner zu 
tun. Lediglich ein Bild am linken 
unteren Bildschirmrand zeigt das 
Aussehen des tatsächlichen Geg- 
ners 

Über Joystick oder Tastatur lassen 
sich vier verschiedene Bewegungen 


ausüben Rechter und linker Haken 
sowie die passende Deckungsbewe- 
gung dazu. Viel ist dies nicht, aber 
es reicht aus, um alle vier Gegner 
schnell zu besiegen. Aus dem Box- 
kampf wird schnell ein vorausschau 
barer Schlagabtausch und die Moti- 
vation ist entsprechend niedrig. 


THING ON A SPRING — 
PUZZLESPIEL MIT BETTFEDERN 


Thing on a Spring ist der einzige 
Hitparadenstürmer auf der Kassette 
und war erst vor einigen Wochen 
noch in den Charts vertreten. Es 
gibt sogar einige Umsetzungen auf 
andere Computer, etwa den Com- 
modore C64. Dat} gerade im letzte- 
ren Fall ein hervorragender Sound 
möglich ist, muß Schneider-User 
nicht neidisch machen. Als erfreu- 
liche Überraschung entpuppte sich 
die Titelmelodie auf dem CPC. 

Ein böser Gnom verwüstet die 

Erde und hortet alle Schätze in sei- 
ner Fabrik tief im Erdinneren. Bevor 
jedoch die Welt endgültig vor die 


Von sich selbst sehen Sie allerdings 
nur den Rücken und mit Ihrer Bein- 
arbeit (Beweglichkeit) ist es nicht 
weit her. Gut, dafs Ihre Gegner dar- 
aus keinen Nutzen ziehen und sich 
der Stehparty angepaßt haben. 

Am unteren Bildschirmrand befin- 
det sich der Gong des Ringrichters, 


Gremlin Take 4: Rocco, der Figth um die Weltmeisterschaft 
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Projekt Future: Codeknacken im Weltall 


Hunde geht, muß wieder einmal 

der Held mit dem Joystick gesteu- 
ert werden Aber diesmal ist es 
nicht Superman oder James Bond, 
sondern nur das ‚Thing on a 
Spring‘“, das Ding auf der Feder. 
Jenes merkwürdige Wesen ist bereits 
in die Fabrik eingedrungen und 
muß sich neun Puzzlesteine zusam- 
mensuchen. Wenn diese Aufgabe 
gelöst ist. dann erfährt man, wie der 
Gnom umzubringen und die Welt 
zu retten ist. Nun nur noch 5 Schal- 
ter umgelegt und Werkzeug einge- 
sammelt, und der Dank des Vater- 
landes ist dem kleinen Hüpfer 
gewils 


Doch der Häfsliche hat viele Fallen 
in seiner Fabrik aufgestellt und 
Leibwächter angeheuert, um unlieb- 
same Besucher fernzuhalten. Aufßer- 
dem braucht das Ding ab und zu ein 
paar Tropfen Ol für die Feder, um 
nicht zu verrosten. Ölkanister gibt 
es genug, nur herankommen muß 
man 

Thing on a Spring war zu recht in 
den Hitparaden. Es ist ein wahnsin- 
nig gutes Spiel, bei dem alles ge- 
boten wird, was der Spielfreund 
sucht. Hervorragendes Grafiken, 
viele verschiedene Räume, guter 
Sound und nicht zuletzt auch 


Spielspaf3 durch eine etwas schrul- 
lige Idee. 


FUTURE PROJECT — 
GEPLANTE SELBST- 
ZERSTÖRUNG 


Die SS-Future ist ein riesiges Raum- 
schiff, das aus fünf verschiedenen 
Decks besteht. Ihre Aufgabe ist es, 
die Selbstzerstörung zu aktivieren, 
nähere Gründe werden allerdings 
nicht angegeben. Zu Fuß (Sie ha- 
ben mit Ihrem kleinen Raumflitzer 
gerade angedockt) irren Sie also 
durch das Labyrinth, um nachein- 
ander 8 Codes zu finden. Wenn Ih- 
nen dies gelungen ist, dann können 
Sie sicher sein, daß sich in Zukunft 
niemand mehr in dem Raumschiff 
verirren wird. Aber auch Sie sollten 
sich schleunigst entfernen, denn 
das Selbstzerstörungssystem ist ak- 
tiviert und die SS-Future wird 
explodieren. Machen Sie also kehrt 
und erzählen Sie den Erdenbewoh- 
nern, wie mutig Sie waren. 

Die Grafik von Project Future ist 
nichts Besonderes, der Sound bie- 
tet nicht mehr als ein paar Pieps- 
töne und trotzdem kann das Spiel 
den Strategen und Tüftlern unter 
den Schneider-Besitzern viel Spaß 
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bereiten. Wer auf grofse Action 
Wert legt, ist hier allerdings falsch. 


GRUPY GUMPHREY 
SUPERSLEUTH — 
KAUFHAUSDETEKTIV IN 
NOTEN 


Bei dem Spiel mit dem unaussprech- 
baren Namen übernehmen Sie die 
Rolle eines altersschwachen, wohl- 
beleibten Kaufhausdetektives, der 
als „Mädchen für alles‘ eingesetzt 
wird. Über den Bildschirm scrollt 
eine Meldung mit dem jeweils näch- 
sten Auftrag. So sind zum Beispiel 
einige Enten aus der Zooabteilung 
ausgebrochen und Sie müssen nun 
das richtige Werkzeug zusammen- 
suchen (ein Gewehr bietet sich hier 
an), um dem Federvieh den Garaus 
zu machen. Die Zeit, die Ihnen je- 
weils zur Verfügung steht, ist von 
Job zu Job verschieden. Gelingt 
Ihnen alles, dann verbessert sich 
das Punktekonto. Versagen Sie, 
dann müssen Sie vor den Chef tre- 
ten, der Ihnen eine „Zigarre“ ver- 
pafst. Vier solcher Verwarnungen 
und Sie haben die Papiere in der 
Hand und stehen wieder auf der 
Straßse. 

Die Aufträge sind unterschiedlicher 
Natur. Mal sollen Sie Enten er- 


schiefen (wahrscheinlich, damit 
diese nicht die Kundschaft beifsen), 
mal dürfen Sie einen Säugling mit 
einem Lutscher beruhigen. Auf 
jeden Fall haben Sie eine Menge zu 
tun und müssen den (gar nicht 
smarten) Detektiv mit dem Joy- 
stick und der Kombination durch 
ein Spiel mit 39 Räumen steuern. 
Die Grafik ist dabei recht zufrieden- 
stellend und der Sound sogar sehr 
gut. Für Abwechslung und Spiel- 
spaß ist durch die verrücktesten 
Aufträge gesorgt. 


FAZIT: ES LOHNT 


Gremlin Take 4 ist sicher nicht der 


beste Sampler den es gibt. da andere 
Firmen die Compilations oftmals 
nur mit Hitparadenstürmern be- 
stücken. Irotzdem stimmen Preis 
und Leistung überein, denn als ech- 
ten Flop kann man keines der Spie- 
le bezeichnen. Anscheinend hat 
man sich sogar bei der Zusammen- 
stellung Gedanken gemacht. Jeden- 
falls muß für ein bifschen Spiele- 
spaf3 keine öde Weltraumballerei 
in Kauf genommen werden 

(GS/C. Borgmeier) 


Thing on: Hüpfend in den Kampf gegen das Böse 


ES 


EEE Onraninn 


Genre 
800990009 


war minyo 


Grupy Gumphrey ... kein alltäglicher Job 
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_TEST 


MOUNTIE MIKE’S 
DEATHRIDE 


Die Eisenbahn ist groß 
in Mode 


Nachdem der Express Raider in den 
Spielhallen einen großen Erfolg 
hatte und auch in die Homecompu- 
ter einzog, darf man sich über Spie- 
le ähnlicher Machart nicht mehr 
wundern. Daß diese Nachfolger 
nicht unbedingt schlechter sein müs- 
sen als das Erstwerk, beweist auch 
der ‚„Todesritt des Mountie Mick‘ 
von Ariolasoft. 


AKTION „SICHERE EISENBAHN“ 


Der Trans-Canadian-Express bricht 
zu seiner weiß Gott wievielten Fahrt 
auf. Doch diese Fahrt sollte anders 
werden als sonst. Etwa zehn Kilo- 
meter nach der letzten größeren Ort- 
schaft bemerken vereinzelte Spazier- 
gänger auf dem Geldtransportwagen 
ein paar merkwürdige Gestalten. 
Wegen der doch nicht allzu geringen 
Entfernung zum Zug können sie 
aber nicht eindeutig erkennen, ob 
es sich um Menschen oder nur um 
eine optische Täuschung handelt. 
Daher meldet auch niemand den 
Vorfall beim nächsten Bahnhof. 
Leider handelt es sich aber nicht im 
geringsten um eine Täuschung, son- 
dern um die gefürchteten McClus- 
key Bande, vor der keine Eisenbahn- 
linie in ganz Kanada mehr sicher ist. 
Aber die Gangster haben ja nicht 
mit Mick, dem unermüdlichen 
Mountie, der immer auf der Suche 
nach Verbrechern ist, gerechnet. 
Und tatsächlich bemerkt er den 
Überfall (so ein Zufall aber auch!). 
Bei nächstbester Gelegenheit 
springt er auf den fahrenden Zug. 
Flink wie ein Wiesel springt er von 
Waggon zu Waggon, allen Gefahren 
trotzend. Und von diesen gibt es 
wirklich mehr als genug: 

Der Tankwagen ist leckgeschlagen 
und Benzin läuft aus, auf dem unser 
guter Mick ausrutschen und vom 
Zug fallen könnte. Auf der Strecke 
gibt es viele dunkle Tunnel, in de- 
nen Mick gut ein Trittbrett verfeh- 
len könnte. Selbstverständlich ist 
die McCluskey-Bande, die den gu- 
ten Mick natürlich schon lange be- 
merkt hat. auch nicht ganz taten- 
los und schikaniert unseren Hel- 
den, wo sie nur kann. Sie beschiefst 


ihn mit Pistolen und legt ihm bren- 
nende Dynamitstangen vor die 
Beine. Mick hat es wirklich nicht 
leicht. Er muß sich schon sehr an- 
strengen, um nicht in die Leichtge- 
wicht-Hilfsmountie-Klasse zurück- 
gestuft zu werden. 

Die Ladezeit wird von einem grafisch 
hervorragenden Ladebild überbrückt. 
welches Mick, gerade auf dem Zug 
stehend, sich mit seinem Ballermann 
gegen die Banditen verteidigend, 
zeigt. Nach Programmstart erlebt 
man dann eine herbe Enttäuschung: 
In einem kleinen Fenster am unte- 
ren Bildschirmrand scrollen ständig 
die Highscore-Liste und die Auffor- 
derung, das Spiel mit der Feuertaste 
zu starten. Der restliche Bildschirm 
wird vom Programmnamen und den 
üblichen Copyright-Meldungen ein- 
genommen. Dazu ertönt ein sehr an- 
sprechendes Musikstück (übrigens 


vom Soundspvzialisten WE M.U.S.I.C), 


das sich wirklich hören lassen kann. 
Betätigt man nun die Feuertaste, be- 
findet man sich gleich mitten im 
Spielgeschehen. Der Bildschirm ist 
folgendermaßen eingeteilt: Am obe- 
ren Rand befindet sich eine Bergket- 
te. Ungefähr in der Mitte ist der ei- 
gentliche Zug, d.h., eigentlich sieht 
man nur zwei Waggons. Ganz unten 
befindet sich ein Fenster, in welchem 
ständig die Anzahl der verbleibenden 
Leben, dargestellt durch kleine 
Mountie Micks, am Anfang drei an 
der Zahl, und der verbleibende Muni- 
tionsvorrat unseres Helden gezeigt 
werden. Knapp unterhalb des Zuges 
kann man noch einen Zaun erkennen. 
Dieser scrollt etwas schneller zur 
Seite hinaus als der Zug. wodurch 
der Eindruck entsteht. als betrachte 
man den Zug im Vorbeifahren. 


SCHNELLE SPIELWEISE 
ERFORDERLICH 


Mountie Mick befindet sich zu die- 
sem Zeitpunkt bereits auf einem der 
Waggons und macht sich auf die 
Suche nach den Verbrechern. Er 
muß sie stellen (im Klartext: „‚be- 
seitigen‘‘), bevor sie den Geldtrans- 
portwaggon völlig leergeräumt ha- 
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ben. Der Spieler steuert unseren 
Mick mit der Tastatur oder dem 
Joystick, wobei letzterer vorzuzie- 
hen ist. Mit der Taste für Oben 
springt Mick nach - na, wohin 
springt er wohl? Richtig, nach oben. 
Betätigen der Tasten für links oder 
rechts bewegt unseren Helden in die 
jeweilige Richtung. Und jetzt gut 
aufgepaßt, am Spielstart ja nicht 
schlafen oder schnell noch eine 
Tasse Kaffee besorgen, denn der 
Zug fährt ja (übrigens nach rechts) 
und Mick könnte aus dem Bild- 
schirm hinausgefahren werden, was 
zur Folge hätte, dafs er eines seiner 
drei Leben verliert. 

Was der gute Mick jetzt zu tun hat, 
das dürfte ja wohl klar sein. Um die- 
se Aufgabe zu erledigen, kann er von 
Waggon zu Waggon hüpfen Aber 
gut aufpassen, daß er nicht zwischen 
die schweren Wagen gerät. Ein 
Sprung daneben kann tödlich sein. 
Keine Angst, ein Held wie unser 
Mick hat ja drei Leben. Er kann sich 
sowohl auf dem Ladegut der einzel- 
nen Wagen als auch direkt auf dem 
Wagenboden frei bewegen. Frei 
heißt, nach links oder rechts gehen 
oder, falls er seinen sportlichen Tag 
hat, auch hüpfen. Dabei wird er von 


Mounti Mick in voller Aktion 


den Mitgliedern der McCluskey- 

Bande selbstverständlich behindert. 
Sie legen ihm brennende Dynamit- 
stangen oder Granaten in den Weg. 


- — Di 


TREHIH: 


u 


Einfachste Grafik aus den Gründertagen 


TEST 


REAKTOR 


Tritt Mick auf eine solche, wird ei- 
nes seiner Leben ‚‚weggefegt“. 
Außerdem beschiefien sie ihn mit 
ihren Ballermännern, was ihm auch 


SEORE - HaHHaH 


. 
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nicht gerade gut bekommt. Mick 
kann seinerseits aber auch feste zu- 
rückballern, jedoch sollte er spar- 
sam mit der Munition umgehen, 
denn diese ist nur begrenzt vorhan- 
den. Gott sei Dank haben die Gang- 
ster ein bifschen zu viel davon mit- 
genommen, so dafs ihnen ab und zu 
eine ihrer vielen Munitionskisten zu 
schwer wird und sie diese einfach 
stehen lassen. Mick braucht sich nur 
über eine solche zu bewegen und 
en ist sein Revolver wieder rand- 
voll. 

Hat Mick genug Gangster umgenie- 
tet, bevor seine drei Leben zu Ende 
gegangen sind, darf sich der wacke- 
re Mountie in die Highscore-Liste 
eintragen, allerdings sollte sein 
Name, Deckname, Codename, Nach- 
name oder einfach seine Initialen 
nicht länger als drei Zeichen lang 
sein, denn sonst wird der Platz nicht 
reichen. 


KEINE BERAUSCHENDE GRAFIK 


Die ganze muntere Ballerei wird von 
Geräuschen, wie Rattern des Zuges 
oder dem üblichen ‚‚Peng-Peng“ 
der Revolver, lautstark unterstützt. 
Die Grafik dagegen gehört nicht ge- 
rade zum Allerfeinsten. Grobauflö- 
send und in Mode O0 erstellt, kann 
man sich des Eindrucks nicht erweh- 
ren, ein Spiel aus der Anfangszeit 
der CPC-Computer (wie zum Bei- 
spiel Roland on the Run) vor sich zu 
haben. Insgesamt ist „Mountie 
Micks Deathride‘“ nicht gerade 
schlecht, aber auch nicht unbedingt 
das Gelbe vom Ei. Die Spielmotiva- 
tion ist eher mittelmäßig. Man 
wird zwar am Anfang noch öfters 
auf das Programm zurückgreifen, 
weil die Aufgabe — speziell die 
Ballerfans unter uns — doch ziem- 
lich stark reizt, aber nach einiger 
Zeit wird das Spiel wohl doch in der 
Schublade landen. Normalerweise 
sind wir aus dem Hause Airolasoft 
Besseres gewöhnt (man denke nur 
an Bride of Frankenstein oder den 
UBI-Knüller Zombie), aber sollte es 
bei dem einen Ausrutscher bleiben, 
dann wollen wir „Mountie Micks 
Deathride‘“ gern vergessen. 

(TB) 


Grafik 


Motivation 


Bedienung 


v & 7 A 
Von Reaktor bei Ariolasoft 


In einem finsteren Kerker, weit in 
den Tiefen des Universums, wird 
ein Mensch gefangen gehalten, der 
das letzte Geheimnis der Naturwis- 
senschaft enttarnt hat. Aber er ist 
von den finsteren Mächten der Ga- 
laxis, den Herrschern auf Triads, 
gefangen worden, um ihm das Ge- 
heimnis zu entreifsen und damit 
eine Waffe zu bauen, gegen die es 
kein Gegenmittel gibt. Befreien Sie 
den Gefangenen, bevor die Milch- 
straße unterjocht wird! 

Um den Wissenschaftler zu befreien. 
haben Sie 30 Minuten Zeit. Wahr- 
lich nicht viel, denn immerhin geht 
es in diesem Spiel, das von Ariola- 
soft vertrieben wird, darum, zu 
verhindern, dafs der Gefangene sein 
Geheimnis preisgeben muß. Und 
wenn Sie es in der vorgegebenen 
Zeit nicht schaffen, so werden die 
bösen Mächte auf Triads endlich 
das Wissen haben, eine Waffe zu 
bauen, die alles, aber auch wirklich 
alles, zerstört und gegen die es kein 
Gegenmittel gibt. 

Also, machen Sie sich auf den Weg 
in dieses Gefängnis, das als das aus- 
bruchsicherste im bekannten Uni- 
versum gilt. Nach der Landung mit 
Ihrem Raumgleiter auf dem fernen 
Planeten, die glücklicherweise nicht 
bemerkt wurde, müssen Sie sich 
jetzt durch las Labyrinth von Räu- 
men und Gängen vorarbeiten, im- 
mer auf der Hut vor den Gegnern. 


GUTE ORIENTIERUNG DURCH 


DREIDIMENSIONALEN 
RAUMWÜRFEL 


Nach dem Durchschreiten der ersten 
Luftschleuse beginnt nun dieses 
Spiel. Sie müssen sich zuerst einmal 
orientieren, wo Sie sind. Dazu ha- 
ben Sie als Spieler ein Hilfsmittel, 
das nicht zu verachten ist. Am rech- 
ten Bildschirmrand wird ständig ein 
Würfel in dreidimensionaler Darstel- 
lung abgebildet, der an jeder Kante 
wiederum 4 kleine Würfel hat. Und 
jeder dieser kleinen Würfel stellt ei- 
nen Raum in dem Gefängniskom- 
plex dar. Durch entsprechende Farb- 
markierungen an allen drei Kanten 
können Sie den eigenen Weg gut 
verfolgen. 

Auch den Weg Ihrer Gegner kön- 
nen Sie durch andere Farbgebung 
der Raumwürfel gut verfolgen. Also, 
immer den Würfel im Auge be- 
halten! 


Triaxos: Anspruchsvolles Titelbild 


Seien Sie nicht überrascht, wenn 
beim Durchstreifen der Räume plötz- 
lich kleine grüne Droiden auftauchen 
Die tun Ihnen nichts, im Gegenteil! 


ACHTEN SIE AUF DIE 
GRUNEN DROIDEN! 


Sie sind nur als Reinigungsroboter 
auf der Suche nach Gegenständen, 
die überall herumliegen. Sie sammeln 
alles auf, auch Waffen und andere 
Sachen Wenn Sie auf einen solchen 
Roboter schietsen, läfst der alles fal- 
len. was er bisher aufgesammelt hat. 
Und wenn Sie dann schnell genug 
sind, können Sie diese Gegenstände 
aufnehmen 

Das Aufnehmen dieser Sachen ist 
ganz einfach. Sie brauchen Ihren 
Helden. den Sie ganz einfach mit 
dem Joystick lenken können, nur 
über den gewünschten Gegenstand 
lenken und schon haben Sie Ihre 
Ausrüstung verstärkt. Da diese grü- 
nen Roboter nicht zurückschietsen, 
können Sie sich ihnen gefahrlos 
nähern. Nur schnell müssen Sie sein, 
denn die Reinigungsroboter wollen 
sofort wieder ihre Aufgabe wahr- 
nehmen und das was Sie fallenge- 
lassen haben, wıeder aufsammeln. 
Anders sieht es schon mit den 
Kampfrobotern aus Die sind nicht 
so harmlos. Sie erkennen sie an ei- 
ner Zahl, die auf ihrem Bıustpanzer 
aufgemalt ist. Eine ‚|‘ bedeutet 
Kampfstärke eins. Das sind die 
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schwächsten in dem Abwehrsystem 
Doch, wer weits, was Ihnen noch so 
begegnet? Diese Kampfroboter 
müssen Sie unnachsichtig abschie- 
fen, bevor Sie pulverisiert werden. 


KEIN AUSGANG? SPRENGEN 
SIE SICH DEN WEG FREI! 


Wenn Sie in einem Raum angekom- 
men sind, aus dem es scheinbar kei- 
nen Ausweg gibt, da Sie keinen Aus- 
gang entdecken können, schauen 
Sie sich auf dem Bildschirm unten 
rechts eine verkleinerte Darstel- 
lung des jeweiligen Raumes an 

Da entdecken Sie versteckte Türen, 
die Sie, wenn Sie in Ihrer Ausrü- 
stung noch Handgranaten haben, 
leicht aufsprengen können 

Dazu gehen Sie an die Stelle im Zim- 
mer, an der so eine versteckte Tür 
ist und zünden eine Handgranate 
Das geht relativ leicht. Sie drücken 
den Feuerknopf so lange, bis im 
Aktionskontrollfenster die Hand- 
granate erscheint. Nun den Feuer- 
knopf loslassen, nochmals kurz 
drücken und dann zur Seite gehen, 
damit Sie nicht selbst von der Ex- 
plosion zerrissen werden. Nach drei 
Sekunden erfolgt dann die Explo- 
sion und die vorher versteckte Tür 
ist sichtbar. Sie haben nun die Mög- 
lichkeit, diesen Raum zu verlassen. 
Aber Sie haben noch vıne andere 
Möglichkeit. manche Räume zu ver- 
lassen In einigen Zimmern finden 


Sie in der Mitte des Raumes einen 
farbigen Kreis. Stellen Sie sich dort 
hin und nach einigen Sekunden lö- 
sen Sie sich auf und sind im Hyper- 
raum Jetzt den Joystick in die ge- 
wünschte Richtung drücken und 


SIE KÖNNEN AUCH 
TELEPORTIEREN 


schon sind Sie im Nachbarraum 
und materialisieren dort wieder. 
Dann heifät es mitunter schnell rea- 
gieren. denn die Abwehrroboter 
warten schon mit schufsbereiten 
Waffen! 


KEINE SCHUSSMINUTION MEHR? 


TANKEN SIE EINFACH AUF! 


Je mehr Gegner Ihnen in die Quere 
kommen und je mehr Sie schiefien 
müssen, desto schneller wird Ihre 
Munition zu Ende gehen Behalten 
Sie den Vorrat im Auge! Droht er 

zu Ende zu gehen, so suchen Sie 
einen Raum auf, in dem Sie in der 
Mitte eine Säule finden. Berühren 
Sie eine solche Säule, so wird Ihr 
Vorrat an Schüssen wieder aufgefüllt. 


Bei Ihren Streifzügen werden Sie 
noch auf andere Gegenstände tref- 
fen, die sich als sehr nützlich erwei- 
sen. So zum Beispiel ein Jet-Pack. 
das Sie dann benötigen, um mit 
Ihrem befreiten Gefangenen wieder 
zurück zum Raumgleiter zu gelan- 
gen. Oder den Sicherheitsschlüssel, 
der die Abwehrautomatik des ge- 
heimnisvollen Gefängnisses aus- 
schaltet. 


VIER TEILE BRAUCHEN SIE, 
UM EINE SUPER-LASER-WAFFE 
ZU HABEN! 


Und dann gibt es noch vier Einzel- 
teile eines Super-Laser-Gewehres. 
gegen das die Abwehr-Roboter hilf- 
los sind. Diese vier Teile gilt es zu 
suchen, denn ohne dieses Laserge- 
wehr kommen Sie an einigen Robo- 
tern nicht vorbei. Einige andere 
Überraschungen warten noch auf 
Sie, also lassen Sie sich nicht 
überraschen! 


GUTE CPC-GRAFIK, 
SCHLECHTER SOUND 


Das Spiel besticht durch gute Grafik 
und gelungene Farbgebung. Jedoch 
fällt der Sound deutlich ab. Abge- 
sehen von einer ganz netten Einlei- 
tungsmelodie hören Sie sonst nur 
Action-Geräusche. 

Gespielt wird mit dem Joystick 
oder der Tastatur, wobei Sie von 


TEST 


Teleportation in der Mitte des jeweiligen Raumes 


der vorgegebenen Tastenbelegung 
abweichen und sich selbst Ihre Bele- 
gung definieren können. Sonderlich 
schnell ist das Spiel nicht, aber ins- 
gesamt ganz nett gelungen. 


Die Kassettenversion kostet DM 
29,95, für die Diskette müssen Sie 
DM 44,95 auf den Ladentisch le- 
gen. Die deutsche Bedienungsanlei- 
tung ist sehr knapp gehalten und 
beschränkt sich eigentlich mehr auf 
die Rahmenhandlung, ohne auf die 
Feinheiten der Bedienung einzuge- 
hen. Da müssen Sie schon selbst 
ausprobieren, wie Sie am besten vor- 
zugehen haben! Und Sie können 


Feindliche Roboter in Aktion 
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sicher sein, dafs das Spiel noch eini- 
ge Überraschungen in sich birgt. 
(JE) 


Iriaxos 
Grafik 


Motivation 
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Bei ariolasoft 


VERDIENEN SIE GELD 
MITIHREM COMPUTER! 


WIR ZAHLEN BIS ZU 1000DM! 


Haben Sie einen CPC 464 oder 664 ? Einen 6128 
Können $ie programmieren? In Basic oder 
Maschinensprache? Dann bietet SCHNEIDER AKTIV 
Ihnen die Möglichkeit, mit diesem Hobby Geld zu verdie- 
nen! 


Wie? Ganz einfach. Sie senden uns die Programme, 
die Sie für einen Abdruck als geeignet halten, zusammen 
mit einer Kurzbeschreibung, aus der auch die verwende- 
te Hardware — eventuelle Erweiterungen — benutzte Pe- 
ripherie — hervorgehen muß, ein. 


Benötigt werden: eine Datenkassette oder Diskette! 
Wenn die Redaktion sich überzeugt hat, daß dieses Pro- 
gramm läuft und sich zum Abdruck eignet, zahlen wir 
Ihnen pro Programm je nach Umfang bis zu DM 300, —! 


Name des Einsenders: 


Für das ‚Listing des Monats‘‘ sogar DM 1.000,'—. 
Sie erhalten Ihre Kassette /Diskette selbstverständlich 

zurück, wenn Sie einen ausreichend frankierten 

Rückumschlag mit Ihrer Adresse beifügen. 


Bei der Einsendung müssen Sie mit Ihrer Unterschrift ga- 
rantieren, daß Sie der alleine Inhaber der Urheber-Rechte 
sind! Benutzen Sie bitte anhängendes Formular! (Wir 
weisen darauf hin, daß auch die Reaktion englische 
Fachzeitschriften liest und ‚‚umgestaltete‘‘ Programme 
ziemlich schnell erkennt). 


Um Ihnen die Arbeit zu erleichtern, finden Sie hier ein 
Formular. Sie können es ausschneiden oder fotokopie- 
ren. 


Straße /Hausnr. /Tel.: 


PLZ/Ort: 


Hiermit biete ich Ihnen zum Abdruck folgende(s) Programm(e) an: 


Benötigte Geräte: 


Beigefügt [| Listings {| Kassette [_| Diskette 


Ich versichere, der alleinige Urheber des Programms zu sein! 
Hiermit ermächtige ich die Redaktion, ieses Programm abzudrucken und wirtschaftlich zu verwerten. Sollte es in 
den Kassetten-Service aufgenommen werden, erhalte ich auch dafür eine entsprechende Vergütung. Das Copyright 


geht an den Verlag über. 


Rechtsverbindliche Unterschrift 


SCHNEIDER AKTIV 
PROGRAMM-REDAKTION 
POSTFACH 1161 

D-8044 UNTERSCHLEISSHEIM 


